home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1999-04-12 | 24.2 KB | [TgPj/RBv2] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
| id metadata |
|---|
| key | value |
|---|
| macFileType | [TgPj] |
| macFileCreator | [RBv2] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0b 12 00 01 bf fd fb 07 | bf fe fd 0b 41 41 41 41 |........|....AAAA|
|00000010| 41 41 41 41 41 41 41 41 | 41 41 01 04 70 43 6f 64 |AAAAAAAA|AA..pCod|
|00000020| 00 00 01 00 01 00 0e 51 | 75 6f 74 65 54 68 69 6e |.......Q|uoteThin|
|00000030| 67 20 30 2e 34 80 90 42 | 80 90 42 00 04 00 00 00 |g 0.4..B|..B.....|
|00000040| 00 16 a9 20 50 6f 73 74 | 61 6c 43 6f 64 65 20 49 |... Post|alCode I|
|00000050| 6e 63 2e 20 31 39 39 38 | 16 a9 20 50 6f 73 74 61 |nc. 1998|.. Posta|
|00000060| 6c 43 6f 64 65 20 49 6e | 63 2e 20 31 39 39 38 02 |lCode In|c. 1998.|
|00000070| 49 43 4e 23 80 04 00 01 | 80 00 00 06 60 00 00 18 |ICN#....|....`...|
|00000080| 18 00 00 60 06 00 00 48 | 0a 00 00 42 22 00 00 40 |...`...H|...B"..@|
|00000090| 8a 00 00 40 22 00 00 40 | 8a 00 00 40 22 00 00 40 |...@"..@|...@"..@|
|000000a0| 8a 00 00 60 26 00 01 98 | 99 80 06 06 60 60 18 01 |...`&...|....``..|
|000000b0| 80 18 12 02 20 28 10 88 | 88 88 10 22 02 28 30 08 |.... (..|...".(0.|
|000000c0| 80 8c 70 22 02 2a 90 08 | 80 8d b0 22 02 2b 98 09 |..p".*..|...".+..|
|000000d0| 80 99 a6 26 62 67 69 98 | 19 9e 1a 60 06 78 06 80 |...&bgi.|...`.x..|
|000000e0| 01 e0 01 a0 07 80 00 68 | 1e 00 00 1a 78 00 00 06 |.......h|....x...|
|000000f0| e0 00 00 01 80 00 00 01 | 80 00 00 07 e0 00 00 1f |........|........|
|00000100| f8 00 00 7f fe 00 00 7f | fe 00 00 7f fe 00 00 7f |........|........|
|00000110| fe 00 00 7f fe 00 00 7f | fe 00 00 7f fe 00 00 7f |........|........|
|00000120| fe 00 00 7f fe 00 01 ff | ff 80 07 ff ff e0 1f ff |........|........|
|00000130| ff f8 1f ff ff f8 1f ff | ff f8 1f ff ff f8 3f ff |........|......?.|
|00000140| ff fc 7f ff ff fe ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000150| ff ff ff ff ff ff 7f ff | ff fe 1f ff ff f8 07 ff |........|........|
|00000160| ff e0 01 ff ff 80 00 7f | fe 00 00 1f f8 00 00 07 |........|........|
|00000170| e0 00 00 01 80 00 69 63 | 6c 38 80 10 00 00 00 00 |......ic|l8......|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 ff ff 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 ff ff e1 e1 ff ff 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 ff | ff e1 e1 e1 e1 e1 e1 ff |........|........|
|000001d0| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 ff ff e1 | e1 e1 e1 e1 e1 e1 e1 e1 |........|........|
|000001f0| e1 ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 ff e3 e3 | 00 e1 e1 e1 e1 e1 e1 e1 |........|........|
|00000210| e3 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 ff e3 e3 | e3 e3 00 e1 e1 e1 e3 e5 |........|........|
|00000230| e5 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 ff e3 e3 | e3 e3 e3 e3 00 e5 e5 e5 |........|........|
|00000250| e5 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 ff e3 e3 | e3 e3 e3 e3 e5 e5 e5 e5 |........|........|
|00000270| e5 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 ff e3 e3 | e3 e3 e3 e3 e3 e5 e5 e5 |........|........|
|00000290| e5 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 ff e3 e3 | e3 e3 e3 e3 e5 e5 e5 e5 |........|........|
|000002b0| e5 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 ff e3 e3 | e3 e3 e3 e3 e3 e5 e5 e5 |........|........|
|000002d0| e5 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 ff e3 e3 | e3 e3 e3 e3 e5 e5 e5 e5 |........|........|
|000002f0| e5 e5 ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 ff ff 2a 2a e3 | e3 e3 e3 e3 e3 e5 e5 e5 |.....**.|........|
|00000310| e5 0b 0b ff ff 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 ff ff 2a 2a 2a 2a 2a | 2a e3 e3 e3 e5 e5 e5 0b |...*****|*.......|
|00000330| 0b 0b 0b 0b 0b ff ff 00 | 00 00 00 00 00 00 00 ff |........|........|
|00000340| ff 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 54 0b 0b 0b |.*******|****T...|
|00000350| 0b 0b 0b 0b 0b 0b 0b ff | ff 00 00 00 00 00 00 ff |........|........|
|00000360| 54 54 00 2a 2a 2a 2a 2a | 2a 2a 54 7f 11 11 00 0b |TT.*****|**T.....|
|00000370| 0b 0b 0b 0b 0b 0b 11 17 | ff 00 00 00 00 00 00 ff |........|........|
|00000380| 54 54 54 54 00 2a 2a 2a | 54 7f 7f 7f 7f 11 11 11 |TTTT.***|T.......|
|00000390| 00 0b 0b 0b 11 17 17 17 | ff 00 00 00 00 00 00 ff |........|........|
|000003a0| 54 54 54 54 54 54 00 7f | 7f 7f 7f 7f 11 11 11 11 |TTTTTT..|........|
|000003b0| 11 11 00 17 17 17 17 17 | ff 00 00 00 00 00 ff ff |........|........|
|000003c0| 54 54 54 54 54 54 7f 7f | 7f 7f 7f 7f 7f 11 11 11 |TTTTTT..|........|
|000003d0| 11 11 17 17 17 17 17 17 | ff ff 00 00 00 ff 00 ff |........|........|
|000003e0| 54 54 54 54 54 54 54 7f | 7f 7f 7f 7f 11 11 11 11 |TTTTTTT.|........|
|000003f0| 11 11 11 17 17 17 17 17 | ff f9 ff 00 ff 00 f7 ff |........|........|
|00000400| 54 54 54 54 54 54 7f 7f | 7f 7f 7f 7f 7f 11 11 11 |TTTTTT..|........|
|00000410| 11 11 17 17 17 17 17 17 | ff f7 f9 ff ff f7 f7 ff |........|........|
|00000420| 54 54 54 54 54 54 54 7f | 7f 7f 7f 7f 11 11 11 11 |TTTTTTT.|........|
|00000430| 11 11 11 17 17 17 17 17 | ff f7 f7 ff ff f7 00 ff |........|........|
|00000440| ff 54 54 54 54 54 7f 7f | 7f 7f 7f ff ff 11 11 11 |.TTTTT..|........|
|00000450| 11 11 17 17 17 17 17 ff | ff f7 f9 ff ff f7 f7 f7 |........|........|
|00000460| 00 ff ff 54 54 54 54 7f | 7f ff ff f9 f9 ff ff 11 |...TTTT.|........|
|00000470| 11 11 11 17 17 ff ff f7 | f9 f9 f9 ff 00 ff ff f7 |........|........|
|00000480| f7 f7 00 ff ff 54 7f ff | ff f9 f9 f9 f9 f7 f6 ff |.....T..|........|
|00000490| ff 11 17 ff ff f7 f9 f9 | f9 ff ff 00 00 00 00 ff |........|........|
|000004a0| ff f7 f7 f7 00 ff ff f9 | f9 f9 f7 f6 f6 f6 f6 f6 |........|........|
|000004b0| f6 ff ff f7 f9 f9 f9 ff | ff 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 ff ff f7 f7 f7 00 00 | f6 f6 f6 f6 f6 f6 f6 f6 |........|........|
|000004d0| f7 f7 f9 f9 f9 ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 ff ff f7 f7 f7 | 00 00 f6 f6 f6 f6 f7 f7 |........|........|
|000004f0| f9 f9 f9 ff ff 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 ff ff f7 | f7 f7 00 00 f7 f7 f9 f9 |........|........|
|00000510| f9 ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 ff | ff f7 f7 f7 f9 f9 f9 ff |........|........|
|00000530| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 ff ff f7 f9 ff ff 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 ff ff 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 04 74 65 |........|......te|
|00000580| 78 74 04 52 2a 63 68 04 | 54 45 58 54 00 00 01 41 |xt.R*ch.|TEXT...A|
|00000590| 04 56 69 65 77 05 45 61 | 73 65 6c 04 ab 06 8b 05 |.View.Ea|sel.....|
|000005a0| 12 04 4e 61 6d 65 05 45 | 61 73 65 6c 05 46 72 61 |..Name.E|asel.Fra|
|000005b0| 6d 65 01 30 0c 48 61 73 | 42 61 63 6b 43 6f 6c 6f |me.0.Has|BackColo|
|000005c0| 72 05 46 61 6c 73 65 09 | 42 61 63 6b 43 6f 6c 6f |r.False.|BackColo|
|000005d0| 72 08 31 36 37 37 37 32 | 31 35 08 42 61 63 6b 64 |r.167772|15.Backd|
|000005e0| 72 6f 70 01 30 05 54 69 | 74 6c 65 0b 51 75 6f 74 |rop.0.Ti|tle.Quot|
|000005f0| 65 20 54 68 69 6e 67 07 | 56 69 73 69 62 6c 65 04 |e Thing.|Visible.|
|00000600| 54 72 75 65 08 43 6c 6f | 73 65 42 6f 78 05 46 61 |True.Clo|seBox.Fa|
|00000610| 6c 73 65 08 47 72 6f 77 | 49 63 6f 6e 05 46 61 6c |lse.Grow|Icon.Fal|
|00000620| 73 65 08 5a 6f 6f 6d 49 | 63 6f 6e 05 46 61 6c 73 |se.ZoomI|con.Fals|
|00000630| 65 0b 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 09 50 |e.Balloo|nHelp..P|
|00000640| 6c 61 63 65 6d 65 6e 74 | 01 32 05 57 69 64 74 68 |lacement|.2.Width|
|00000650| 03 33 30 30 06 48 65 69 | 67 68 74 03 31 38 34 08 |.300.Hei|ght.184.|
|00000660| 4d 69 6e 57 69 64 74 68 | 02 36 34 09 4d 69 6e 48 |MinWidth|.64.MinH|
|00000670| 65 69 67 68 74 02 36 34 | 08 4d 61 78 57 69 64 74 |eight.64|.MaxWidt|
|00000680| 68 05 33 32 30 30 30 09 | 4d 61 78 48 65 69 67 68 |h.32000.|MaxHeigh|
|00000690| 74 05 33 32 30 30 30 07 | 00 05 45 61 73 65 6c b8 |t.32000.|..Easel.|
|000006a0| 01 06 41 70 70 6c 65 74 | 00 03 14 66 51 75 6f 74 |..Applet|...fQuot|
|000006b0| 65 54 65 78 74 20 61 73 | 20 53 74 72 69 6e 67 01 |eText as| String.|
|000006c0| 16 66 54 6f 64 61 79 73 | 51 75 6f 74 65 20 61 73 |.fTodays|Quote as|
|000006d0| 20 53 74 72 69 6e 67 01 | 14 66 54 69 74 6c 65 54 | String.|.fTitleT|
|000006e0| 65 78 74 20 61 73 20 53 | 74 72 69 6e 67 00 06 0d |ext as S|tring...|
|000006f0| 52 65 61 64 51 75 6f 74 | 65 54 65 78 74 00 00 00 |ReadQuot|eText...|
|00000700| 11 14 11 14 14 13 53 75 | 62 20 52 65 61 64 51 75 |......Su|b ReadQu|
|00000710| 6f 74 65 54 65 78 74 28 | 29 1d 44 69 6d 20 6c 69 |oteText(|).Dim li|
|00000720| 62 50 72 65 66 50 61 74 | 68 20 61 73 20 66 6f 6c |bPrefPat|h as fol|
|00000730| 64 65 72 49 74 65 6d 22 | 44 69 6d 20 6c 69 62 50 |derItem"|Dim libP|
|00000740| 72 65 66 46 69 6c 65 20 | 61 73 20 54 65 78 74 49 |refFile |as TextI|
|00000750| 6e 70 75 74 53 74 72 65 | 61 6d 15 44 69 6d 20 74 |nputStre|am.Dim t|
|00000760| 68 65 54 65 78 74 20 61 | 73 20 53 74 72 69 6e 67 |heText a|s String|
|00000770| 00 20 2f 2f 20 52 65 61 | 64 20 74 68 65 20 66 69 |. // Rea|d the fi|
|00000780| 6c 65 20 61 73 20 61 20 | 66 6f 6c 64 65 72 49 74 |le as a |folderIt|
|00000790| 65 6d 2e 6c 69 62 50 72 | 65 66 50 61 74 68 20 3d |em.libPr|efPath =|
|000007a0| 20 67 65 74 46 6f 6c 64 | 65 72 49 74 65 6d 28 20 | getFold|erItem( |
|000007b0| 41 70 70 2e 66 54 78 74 | 53 72 63 46 69 6c 65 20 |App.fTxt|SrcFile |
|000007c0| 29 28 6c 69 62 50 72 65 | 66 46 69 6c 65 20 3d 20 |)(libPre|fFile = |
|000007d0| 6c 69 62 50 72 65 66 50 | 61 74 68 2e 4f 70 65 6e |libPrefP|ath.Open|
|000007e0| 41 73 54 65 78 74 46 69 | 6c 65 00 34 2f 2f 20 45 |AsTextFi|le.4// E|
|000007f0| 78 74 72 61 63 74 20 74 | 68 65 20 74 69 74 6c 65 |xtract t|he title|
|00000800| 20 6f 66 20 74 68 65 20 | 74 65 78 74 2c 20 77 68 | of the |text, wh|
|00000810| 69 63 68 20 69 73 20 69 | 6e 20 6c 69 6e 65 20 31 |ich is i|n line 1|
|00000820| 27 45 61 73 65 6c 2e 66 | 54 69 74 6c 65 54 65 78 |'Easel.f|TitleTex|
|00000830| 74 20 3d 20 6c 69 62 50 | 72 65 66 46 69 6c 65 2e |t = libP|refFile.|
|00000840| 52 65 61 64 4c 69 6e 65 | 00 38 2f 2f 20 52 65 61 |ReadLine|.8// Rea|
|00000850| 64 20 74 68 65 20 72 65 | 73 74 20 6f 66 20 74 68 |d the re|st of th|
|00000860| 65 20 66 69 6c 65 20 69 | 6e 74 6f 20 74 68 65 20 |e file i|nto the |
|00000870| 71 75 6f 74 65 54 65 78 | 74 20 70 72 6f 70 65 72 |quoteTex|t proper|
|00000880| 74 79 02 44 6f 86 01 45 | 61 73 65 6c 2e 66 51 75 |ty.Do..E|asel.fQu|
|00000890| 6f 74 65 54 65 78 74 20 | 3d 20 45 61 73 65 6c 2e |oteText |= Easel.|
|000008a0| 66 51 75 6f 74 65 54 65 | 78 74 20 2b 20 6c 69 62 |fQuoteTe|xt + lib|
|000008b0| 50 72 65 66 46 69 6c 65 | 2e 52 65 61 64 4c 69 6e |PrefFile|.ReadLin|
|000008c0| 65 20 2b 20 43 68 72 28 | 20 31 33 20 29 1a 4c 6f |e + Chr(| 13 ).Lo|
|000008d0| 6f 70 20 55 6e 74 69 6c | 20 6c 69 62 50 72 65 66 |op Until| libPref|
|000008e0| 46 69 6c 65 2e 45 4f 46 | 00 14 2f 2f 20 43 6c 6f |File.EOF|..// Clo|
|000008f0| 73 65 20 75 70 20 74 68 | 65 20 66 69 6c 65 11 6c |se up th|e file.l|
|00000900| 69 62 50 72 65 66 46 69 | 6c 65 2e 43 6c 6f 73 65 |ibPrefFi|le.Close|
|00000910| 07 45 6e 64 20 53 75 62 | 12 52 65 61 64 54 6f 64 |.End Sub|.ReadTod|
|00000920| 61 79 73 51 75 6f 74 65 | 52 6e 64 00 00 00 13 2e |aysQuote|Rnd.....|
|00000930| 13 00 1a 18 53 75 62 20 | 52 65 61 64 54 6f 64 61 |....Sub |ReadToda|
|00000940| 79 73 51 75 6f 74 65 52 | 6e 64 28 29 3a 2f 2f 20 |ysQuoteR|nd():// |
|00000950| 52 65 61 64 73 20 74 68 | 65 20 74 65 78 74 20 69 |Reads th|e text i|
|00000960| 6e 20 72 61 6e 64 6f 6d | 20 6f 72 64 65 72 20 28 |n random| order (|
|00000970| 69 65 3a 20 23 34 2c 20 | 23 33 32 2c 20 23 39 2c |ie: #4, |#32, #9,|
|00000980| 2e 2e 2e 20 23 6e 29 3c | 2f 2f 20 47 65 74 73 20 |... #n)<|// Gets |
|00000990| 74 6f 64 61 79 27 73 20 | 71 75 6f 74 65 20 66 72 |today's |quote fr|
|000009a0| 6f 6d 20 74 68 65 20 74 | 65 78 74 20 72 65 61 64 |om the t|ext read|
|000009b0| 20 69 6e 20 62 79 20 52 | 65 61 64 51 75 6f 74 65 | in by R|eadQuote|
|000009c0| 54 65 78 74 19 44 69 6d | 20 74 68 65 52 61 6e 64 |Text.Dim| theRand|
|000009d0| 4e 75 6d 20 61 73 20 49 | 6e 74 65 67 65 72 1a 44 |Num as I|nteger.D|
|000009e0| 69 6d 20 74 68 65 45 6e | 74 72 79 4e 75 6d 20 61 |im theEn|tryNum a|
|000009f0| 73 20 49 6e 74 65 67 65 | 72 16 44 69 6d 20 74 68 |s Intege|r.Dim th|
|00000a00| 65 51 75 6f 74 65 20 61 | 73 20 53 74 72 69 6e 67 |eQuote a|s String|
|00000a10| 00 8d 01 2f 2f 20 52 61 | 6e 64 6f 6d 6c 79 20 65 |...// Ra|ndomly e|
|00000a20| 78 74 72 61 63 74 73 20 | 61 20 71 75 6f 74 65 20 |xtracts |a quote |
|00000a30| 66 72 6f 6d 20 61 6c 6c | 20 74 68 65 20 6c 69 6e |from all| the lin|
|00000a40| 65 73 20 6f 66 20 74 65 | 78 74 20 72 65 61 64 20 |es of te|xt read |
|00000a50| 69 6e 20 61 6e 64 20 73 | 74 6f 72 65 73 20 69 74 |in and s|tores it|
|00000a60| 3c 74 68 65 45 6e 74 72 | 79 4e 75 6d 20 3d 20 43 |<theEntr|yNum = C|
|00000a70| 6f 75 6e 74 46 69 65 6c | 64 73 28 20 45 61 73 65 |ountFiel|ds( Ease|
|00000a80| 6c 2e 66 51 75 6f 74 65 | 54 65 78 74 2c 20 43 68 |l.fQuote|Text, Ch|
|00000a90| 72 28 20 31 33 20 29 20 | 29 20 2d 20 31 00 95 01 |r( 13 ) |) - 1...|
|00000aa0| 2f 2f 20 42 65 63 61 75 | 73 65 20 74 68 65 20 72 |// Becau|se the r|
|00000ab0| 61 6e 64 6f 6d 20 72 61 | 6e 67 65 20 69 73 20 66 |andom ra|nge is f|
|00000ac0| 72 6f 6d 20 30 20 74 6f | 20 6e 2d 31 2c 20 6e 65 |rom 0 to| n-1, ne|
|00000ad0| 65 64 20 74 6f 20 61 64 | 64 20 31 20 74 6f 20 67 |ed to ad|d 1 to g|
|00000ae0| 65 74 20 69 74 20 73 74 | 61 72 74 69 6e 67 20 66 |et it st|arting f|
|00000af0| 72 6f 6d 20 31 26 74 68 | 65 52 61 6e 64 4e 75 6d |rom 1&th|eRandNum|
|00000b00| 20 3d 20 28 20 52 6e 64 | 20 2a 20 74 68 65 45 6e | = ( Rnd| * theEn|
|00000b10| 74 72 79 4e 75 6d 20 29 | 20 2b 20 31 00 88 01 2f |tryNum )| + 1.../|
|00000b20| 2f 20 47 65 74 20 74 68 | 65 20 65 78 61 63 74 20 |/ Get th|e exact |
|00000b30| 71 75 6f 74 65 20 73 74 | 72 69 6e 67 2e 20 55 73 |quote st|ring. Us|
|00000b40| 65 20 61 20 52 65 74 75 | 72 6e 20 28 41 53 43 49 |e a Retu|rn (ASCI|
|00000b50| 49 20 23 31 33 29 20 61 | 73 20 74 68 65 20 64 65 |I #13) a|s the de|
|00000b60| 6c 69 6d 69 74 65 72 3e | 74 68 65 51 75 6f 74 65 |limiter>|theQuote|
|00000b70| 20 3d 20 4e 74 68 46 69 | 65 6c 64 28 20 45 61 73 | = NthFi|eld( Eas|
|00000b80| 65 6c 2e 66 51 75 6f 74 | 65 54 65 78 74 2c 20 43 |el.fQuot|eText, C|
|00000b90| 68 72 28 20 31 33 20 29 | 2c 20 74 68 65 52 61 6e |hr( 13 )|, theRan|
|00000ba0| 64 4e 75 6d 20 29 00 35 | 2f 2f 20 4e 6f 77 20 73 |dNum ).5|// Now s|
|00000bb0| 74 6f 72 65 20 74 68 61 | 74 20 6e 75 6d 62 65 72 |tore tha|t number|
|00000bc0| 20 61 73 20 74 68 65 20 | 6c 61 74 65 73 74 20 74 | as the |latest t|
|00000bd0| 65 78 74 20 6c 69 6e 65 | 20 72 65 61 64 25 41 70 |ext line| read%Ap|
|00000be0| 70 2e 66 43 75 72 72 50 | 72 65 66 4c 69 6e 65 20 |p.fCurrP|refLine |
|00000bf0| 3d 20 53 74 72 28 20 74 | 68 65 52 61 6e 64 4e 75 |= Str( t|heRandNu|
|00000c00| 6d 20 29 00 2e 2f 2f 20 | 41 20 6c 69 74 74 6c 65 |m )..// |A little|
|00000c10| 20 65 72 72 6f 72 20 63 | 68 65 63 6b 69 6e 67 20 | error c|hecking |
|00000c20| 69 73 20 62 65 74 74 65 | 72 20 74 68 61 6e 20 6e |is bette|r than n|
|00000c30| 6f 6e 65 16 49 66 20 74 | 68 65 51 75 6f 74 65 20 |one.If t|heQuote |
|00000c40| 3c 3e 20 22 22 20 74 68 | 65 6e 1d 45 61 73 65 6c |<> "" th|en.Easel|
|00000c50| 2e 66 54 6f 64 61 79 73 | 51 75 6f 74 65 20 3d 20 |.fTodays|Quote = |
|00000c60| 74 68 65 51 75 6f 74 65 | 04 45 6c 73 65 9a 01 45 |theQuote|.Else..E|
|00000c70| 61 73 65 6c 2e 66 54 6f | 64 61 79 73 51 75 6f 74 |asel.fTo|daysQuot|
|00000c80| 65 20 3d 20 22 41 70 70 | 61 72 65 6e 74 6c 79 20 |e = "App|arently |
|00000c90| 74 68 65 20 71 75 6f 74 | 65 20 6d 61 63 68 69 6e |the quot|e machin|
|00000ca0| 65 20 69 73 20 62 72 6f | 6b 65 6e 2e 20 50 6c 65 |e is bro|ken. Ple|
|00000cb0| 61 73 65 20 74 65 6c 6c | 20 74 68 65 20 70 72 6f |ase tell| the pro|
|00000cc0| 67 72 61 6d 6d 65 72 2e | 22 06 45 6e 64 20 69 66 |grammer.|".End if|
|00000cd0| 07 45 6e 64 20 53 75 62 | 12 44 69 73 70 6c 61 79 |.End Sub|.Display|
|00000ce0| 54 6f 64 61 79 73 51 75 | 6f 74 65 00 00 00 02 14 |TodaysQu|ote.....|
|00000cf0| 02 14 04 18 53 75 62 20 | 44 69 73 70 6c 61 79 54 |....Sub |DisplayT|
|00000d00| 6f 64 61 79 73 51 75 6f | 74 65 28 29 2d 2f 2f 20 |odaysQuo|te()-// |
|00000d10| 50 75 74 73 20 74 6f 64 | 61 79 27 73 20 71 75 6f |Puts tod|ay's quo|
|00000d20| 74 65 20 69 6e 74 6f 20 | 74 68 65 20 64 69 73 70 |te into |the disp|
|00000d30| 6c 61 79 20 77 69 6e 64 | 6f 77 22 51 75 6f 74 65 |lay wind|ow"Quote|
|00000d40| 46 6c 64 2e 54 65 78 74 | 20 3d 20 45 61 73 65 6c |Fld.Text| = Easel|
|00000d50| 2e 66 54 6f 64 61 79 73 | 51 75 6f 74 65 07 45 6e |.fTodays|Quote.En|
|00000d60| 64 20 53 75 62 11 44 69 | 73 70 6c 61 79 54 6f 64 |d Sub.Di|splayTod|
|00000d70| 61 79 73 44 61 74 65 00 | 00 00 02 13 02 13 09 17 |aysDate.|........|
|00000d80| 53 75 62 20 44 69 73 70 | 6c 61 79 54 6f 64 61 79 |Sub Disp|layToday|
|00000d90| 73 44 61 74 65 28 29 24 | 2f 2f 20 44 69 73 70 6c |sDate()$|// Displ|
|00000da0| 61 79 73 20 74 6f 64 61 | 79 73 20 64 61 74 65 20 |ays toda|ys date |
|00000db0| 69 6e 20 74 68 65 20 66 | 69 65 6c 64 13 44 69 6d |in the f|ield.Dim|
|00000dc0| 20 74 68 65 44 61 74 65 | 20 61 73 20 44 61 74 65 | theDate| as Date|
|00000dd0| 14 44 69 6d 20 74 68 65 | 53 74 72 20 61 73 20 53 |.Dim the|Str as S|
|00000de0| 74 72 69 6e 67 00 12 74 | 68 65 44 61 74 65 20 3d |tring..t|heDate =|
|00000df0| 20 6e 65 77 20 64 61 74 | 65 00 1f 44 61 74 65 42 | new dat|e..DateB|
|00000e00| 6f 78 2e 54 65 78 74 20 | 3d 20 74 68 65 44 61 74 |ox.Text |= theDat|
|00000e10| 65 2e 4c 6f 6e 67 44 61 | 74 65 07 45 6e 64 20 53 |e.LongDa|te.End S|
|00000e20| 75 62 0c 44 69 73 70 6c | 61 79 54 69 74 6c 65 00 |ub.Displ|ayTitle.|
|00000e30| 00 00 02 0e 02 0e 05 12 | 53 75 62 20 44 69 73 70 |........|Sub Disp|
|00000e40| 6c 61 79 54 69 74 6c 65 | 28 29 90 01 2f 2f 20 44 |layTitle|()..// D|
|00000e50| 69 73 70 6c 61 79 73 20 | 74 68 65 20 74 69 74 6c |isplays |the titl|
|00000e60| 65 20 6f 66 20 74 68 65 | 20 71 75 6f 74 65 20 66 |e of the| quote f|
|00000e70| 69 6c 65 20 28 6f 72 20 | 77 68 61 74 65 76 65 72 |ile (or |whatever|
|00000e80| 27 73 20 69 6e 20 6c 69 | 6e 65 20 31 20 6f 66 20 |'s in li|ne 1 of |
|00000e90| 74 68 65 20 63 75 72 72 | 65 6e 74 20 0e 2f 2f 20 |the curr|ent .// |
|00000ea0| 71 75 6f 74 65 20 66 69 | 6c 65 29 20 54 69 74 6c |quote fi|le) Titl|
|00000eb0| 65 42 6f 78 2e 54 65 78 | 74 20 3d 20 45 61 73 65 |eBox.Tex|t = Ease|
|00000ec0| 6c 2e 66 54 69 74 6c 65 | 54 65 78 74 07 45 6e 64 |l.fTitle|Text.End|
|00000ed0| 20 53 75 62 12 52 65 61 | 64 54 6f 64 61 79 73 51 | Sub.Rea|dTodaysQ|
|00000ee0| 75 6f 74 65 53 65 71 00 | 00 00 0a 87 01 0a 87 01 |uoteSeq.|........|
|00000ef0| 1d 18 53 75 62 20 52 65 | 61 64 54 6f 64 61 79 73 |..Sub Re|adTodays|
|00000f00| 51 75 6f 74 65 53 65 71 | 28 29 85 01 2f 2f 20 52 |QuoteSeq|()..// R|
|00000f10| 65 61 64 73 20 74 68 65 | 20 74 65 78 74 20 69 6e |eads the| text in|
|00000f20| 20 73 65 71 75 65 6e 74 | 69 61 6c 20 6f 72 64 65 | sequent|ial orde|
|00000f30| 72 20 28 69 65 3a 20 66 | 72 6f 6d 20 65 6e 74 72 |r (ie: f|rom entr|
|00000f40| 79 20 23 31 20 74 6f 20 | 65 6e 74 72 79 20 23 6e |y #1 to |entry #n|
|00000f50| 29 3c 2f 2f 20 47 65 74 | 73 20 74 6f 64 61 79 27 |)<// Get|s today'|
|00000f60| 73 20 71 75 6f 74 65 20 | 66 72 6f 6d 20 74 68 65 |s quote |from the|
|00000f70| 20 74 65 78 74 20 72 65 | 61 64 20 69 6e 20 62 79 | text re|ad in by|
|00000f80| 20 52 65 61 64 51 75 6f | 74 65 54 65 78 74 19 44 | ReadQuo|teText.D|
|00000f90| 69 6d 20 74 68 65 4e 65 | 78 74 4e 75 6d 20 61 73 |im theNe|xtNum as|
|00000fa0| 20 49 6e 74 65 67 65 72 | 1a 44 69 6d 20 74 68 65 | Integer|.Dim the|
|00000fb0| 45 6e 74 72 79 4e 75 6d | 20 61 73 20 49 6e 74 65 |EntryNum| as Inte|
|00000fc0| 67 65 72 16 44 69 6d 20 | 74 68 65 51 75 6f 74 65 |ger.Dim |theQuote|
|00000fd0| 20 61 73 20 53 74 72 69 | 6e 67 00 8d 01 2f 2f 20 | as Stri|ng...// |
|00000fe0| 52 61 6e 64 6f 6d 6c 79 | 20 65 78 74 72 61 63 74 |Randomly| extract|
|00000ff0| 73 20 61 20 71 75 6f 74 | 65 20 66 72 6f 6d 20 61 |s a quot|e from a|
|00001000| 6c 6c 20 74 68 65 20 6c | 69 6e 65 73 20 6f 66 20 |ll the l|ines of |
|00001010| 74 65 78 74 20 72 65 61 | 64 20 69 6e 20 61 6e 64 |text rea|d in and|
|00001020| 20 73 74 6f 72 65 73 20 | 69 74 3c 74 68 65 45 6e | stores |it<theEn|
|00001030| 74 72 79 4e 75 6d 20 3d | 20 43 6f 75 6e 74 46 69 |tryNum =| CountFi|
|00001040| 65 6c 64 73 28 20 45 61 | 73 65 6c 2e 66 51 75 6f |elds( Ea|sel.fQuo|
|00001050| 74 65 54 65 78 74 2c 20 | 43 68 72 28 20 31 33 20 |teText, |Chr( 13 |
|00001060| 29 20 29 20 2d 20 31 00 | 87 01 2f 2f 20 52 65 61 |) ) - 1.|..// Rea|
|00001070| 64 20 74 68 65 20 71 75 | 6f 74 65 73 20 69 6e 20 |d the qu|otes in |
|00001080| 6e 75 6d 65 72 69 63 20 | 6f 72 64 65 72 2e 20 69 |numeric |order. i|
|00001090| 66 20 77 65 20 67 65 74 | 20 74 6f 20 74 68 65 20 |f we get| to the |
|000010a0| 65 6e 64 2c 20 73 74 61 | 72 74 20 66 72 6f 6d 20 |end, sta|rt from |
|000010b0| 31 29 74 68 65 4e 65 78 | 74 4e 75 6d 20 3d 20 56 |1)theNex|tNum = V|
|000010c0| 61 6c 28 20 41 70 70 2e | 66 43 75 72 72 50 72 65 |al( App.|fCurrPre|
|000010d0| 66 4c 69 6e 65 20 29 20 | 2b 20 31 20 49 66 20 74 |fLine ) |+ 1 If t|
|000010e0| 68 65 4e 65 78 74 4e 75 | 6d 20 3e 20 74 68 65 45 |heNextNu|m > theE|
|000010f0| 6e 74 72 79 4e 75 6d 20 | 74 68 65 6e 0e 74 68 65 |ntryNum |then.the|
|00001100| 4e 65 78 74 4e 75 6d 20 | 3d 20 31 06 45 6e 64 20 |NextNum |= 1.End |
|00001110| 69 66 00 88 01 2f 2f 20 | 47 65 74 20 74 68 65 20 |if...// |Get the |
|00001120| 65 78 61 63 74 20 71 75 | 6f 74 65 20 73 74 72 69 |exact qu|ote stri|
|00001130| 6e 67 2e 20 55 73 65 20 | 61 20 52 65 74 75 72 6e |ng. Use |a Return|
|00001140| 20 28 41 53 43 49 49 20 | 23 31 33 29 20 61 73 20 | (ASCII |#13) as |
|00001150| 74 68 65 20 64 65 6c 69 | 6d 69 74 65 72 3e 74 68 |the deli|miter>th|
|00001160| 65 51 75 6f 74 65 20 3d | 20 4e 74 68 46 69 65 6c |eQuote =| NthFiel|
|00001170| 64 28 20 45 61 73 65 6c | 2e 66 51 75 6f 74 65 54 |d( Easel|.fQuoteT|
|00001180| 65 78 74 2c 20 43 68 72 | 28 20 31 33 20 29 2c 20 |ext, Chr|( 13 ), |
|00001190| 74 68 65 4e 65 78 74 4e | 75 6d 20 29 00 35 2f 2f |theNextN|um ).5//|
|000011a0| 20 4e 6f 77 20 73 74 6f | 72 65 20 74 68 61 74 20 | Now sto|re that |
|000011b0| 6e 75 6d 62 65 72 20 61 | 73 20 74 68 65 20 6c 61 |number a|s the la|
|000011c0| 74 65 73 74 20 74 65 78 | 74 20 6c 69 6e 65 20 72 |test tex|t line r|
|000011d0| 65 61 64 25 41 70 70 2e | 66 43 75 72 72 50 72 65 |ead%App.|fCurrPre|
|000011e0| 66 4c 69 6e 65 20 3d 20 | 53 74 72 28 20 74 68 65 |fLine = |Str( the|
|000011f0| 4e 65 78 74 4e 75 6d 20 | 29 00 2e 2f 2f 20 41 20 |NextNum |)..// A |
|00001200| 6c 69 74 74 6c 65 20 65 | 72 72 6f 72 20 63 68 65 |little e|rror che|
|00001210| 63 6b 69 6e 67 20 69 73 | 20 62 65 74 74 65 72 20 |cking is| better |
|00001220| 74 68 61 6e 20 6e 6f 6e | 65 16 49 66 20 74 68 65 |than non|e.If the|
|00001230| 51 75 6f 74 65 20 3c 3e | 20 22 22 20 74 68 65 6e |Quote <>| "" then|
|00001240| 1d 45 61 73 65 6c 2e 66 | 54 6f 64 61 79 73 51 75 |.Easel.f|TodaysQu|
|00001250| 6f 74 65 20 3d 20 74 68 | 65 51 75 6f 74 65 04 45 |ote = th|eQuote.E|
|00001260| 6c 73 65 9a 01 45 61 73 | 65 6c 2e 66 54 6f 64 61 |lse..Eas|el.fToda|
|00001270| 79 73 51 75 6f 74 65 20 | 3d 20 22 41 70 70 61 72 |ysQuote |= "Appar|
|00001280| 65 6e 74 6c 79 20 74 68 | 65 20 71 75 6f 74 65 20 |ently th|e quote |
|00001290| 6d 61 63 68 69 6e 65 20 | 69 73 20 62 72 6f 6b 65 |machine |is broke|
|000012a0| 6e 2e 20 50 6c 65 61 73 | 65 20 74 65 6c 6c 20 74 |n. Pleas|e tell t|
|000012b0| 68 65 20 70 72 6f 67 72 | 61 6d 6d 65 72 2e 22 06 |he progr|ammer.".|
|000012c0| 45 6e 64 20 69 66 07 45 | 6e 64 20 53 75 62 00 04 |End if.E|nd Sub..|
|000012d0| 09 4d 6f 75 73 65 44 6f | 77 6e 04 14 04 14 07 39 |.MouseDo|wn.....9|
|000012e0| 46 75 6e 63 74 69 6f 6e | 20 4d 6f 75 73 65 44 6f |Function| MouseDo|
|000012f0| 77 6e 28 58 20 41 73 20 | 49 6e 74 65 67 65 72 2c |wn(X As |Integer,|
|00001300| 20 59 20 41 73 20 49 6e | 74 65 67 65 72 29 20 41 | Y As In|teger) A|
|00001310| 73 20 42 6f 6f 6c 65 61 | 6e 1a 49 66 20 58 20 3e |s Boolea|n.If X >|
|00001320| 20 32 39 30 20 61 6e 64 | 20 59 20 3c 20 31 30 20 | 290 and| Y < 10 |
|00001330| 74 68 65 6e 37 2f 2f 20 | 54 68 69 73 20 62 6f 78 |then7// |This box|
|00001340| 20 70 72 6f 76 69 64 65 | 73 20 69 6e 66 6f 20 66 | provide|s info f|
|00001350| 6f 72 20 74 68 65 20 70 | 72 6f 67 72 61 6d 6d 65 |or the p|rogramme|
|00001360| 72 2e 20 43 6c 69 63 6b | 69 6e 67 20 2b 2f 2f 20 |r. Click|ing +// |
|00001370| 77 69 74 68 69 6e 20 74 | 68 69 73 20 72 65 63 74 |within t|his rect|
|00001380| 20 28 74 6f 70 52 69 67 | 68 74 29 20 62 72 69 6e | (topRig|ht) brin|
|00001390| 67 73 20 69 74 20 75 70 | 14 50 72 6f 67 72 61 6d |gs it up|.Program|
|000013a0| 6d 65 72 73 57 69 6e 64 | 2e 53 68 6f 77 06 45 6e |mersWind|.Show.En|
|000013b0| 64 20 69 66 0c 45 6e 64 | 20 46 75 6e 63 74 69 6f |d if.End| Functio|
|000013c0| 6e 0f 45 6e 61 62 6c 65 | 4d 65 6e 75 49 74 65 6d |n.Enable|MenuItem|
|000013d0| 73 04 1e 04 1e 06 15 53 | 75 62 20 45 6e 61 62 6c |s......S|ub Enabl|
|000013e0| 65 4d 65 6e 75 49 74 65 | 6d 73 28 29 2c 2f 2f 20 |eMenuIte|ms(),// |
|000013f0| 4d 61 6b 65 20 73 75 72 | 65 20 61 6c 6c 20 6e 65 |Make sur|e all ne|
|00001400| 63 65 73 73 61 72 79 20 | 6d 65 6e 75 73 20 61 72 |cessary |menus ar|
|00001410| 65 20 65 6e 61 62 6c 65 | 64 18 41 62 6f 75 74 4d |e enable|d.AboutM|
|00001420| 65 6e 75 2e 45 6e 61 62 | 6c 65 64 20 3d 20 54 52 |enu.Enab|led = TR|
|00001430| 55 45 17 4e 65 78 74 4d | 65 6e 75 2e 45 6e 61 62 |UE.NextM|enu.Enab|
|00001440| 6c 65 64 20 3d 20 54 52 | 55 45 1e 45 64 69 74 50 |led = TR|UE.EditP|
|00001450| 72 65 66 65 72 65 6e 63 | 65 73 2e 45 6e 61 62 6c |referenc|es.Enabl|
|00001460| 65 64 20 3d 20 54 52 55 | 45 07 45 6e 64 20 53 75 |ed = TRU|E.End Su|
|00001470| 62 04 4f 70 65 6e 0e 0c | 0e 0c 19 0a 53 75 62 20 |b.Open..|....Sub |
|00001480| 4f 70 65 6e 28 29 8f 01 | 2f 2f 20 53 65 74 20 74 |Open()..|// Set t|
|00001490| 68 65 20 6c 6f 63 61 74 | 69 6f 6e 20 6f 66 20 74 |he locat|ion of t|
|000014a0| 68 65 20 77 69 6e 64 6f | 77 2e 20 57 61 6e 74 20 |he windo|w. Want |
|000014b0| 69 74 20 74 6f 20 6f 70 | 65 6e 20 61 73 20 63 6c |it to op|en as cl|
|000014c0| 6f 73 65 20 61 73 20 70 | 6f 73 73 69 62 6c 65 20 |ose as p|ossible |
|000014d0| 74 6f 20 74 68 65 20 21 | 2f 2f 20 74 6f 70 4c 65 |to the !|// topLe|
|000014e0| 66 74 20 28 77 69 74 68 | 20 61 20 62 69 74 20 6f |ft (with| a bit o|
|000014f0| 66 20 6d 61 72 67 69 6e | 29 0e 45 61 73 65 6c 2e |f margin|).Easel.|
|00001500| 54 6f 70 20 3d 20 35 30 | 0f 45 61 73 65 6c 2e 4c |Top = 50|.Easel.L|
|00001510| 65 66 74 20 3d 20 31 35 | 00 13 2f 2f 20 44 69 73 |eft = 15|..// Dis|
|00001520| 70 6c 61 79 20 74 68 65 | 20 64 61 74 65 11 44 69 |play the| date.Di|
|00001530| 73 70 6c 61 79 54 6f 64 | 61 79 73 44 61 74 65 00 |splayTod|aysDate.|
|00001540| 1e 2f 2f 20 52 65 61 64 | 73 20 69 6e 20 61 6c 6c |.// Read|s in all|
|00001550| 20 74 68 65 20 71 75 6f | 74 65 20 74 65 78 74 0d | the quo|te text.|
|00001560| 52 65 61 64 51 75 6f 74 | 65 54 65 78 74 00 1d 2f |ReadQuot|eText../|
|00001570| 2f 20 44 65 74 65 72 6d | 69 6e 65 27 73 20 74 6f |/ Determ|ine's to|
|00001580| 64 61 79 27 73 20 71 75 | 6f 74 65 20 26 49 66 20 |day's qu|ote &If |
|00001590| 41 70 70 2e 66 44 69 73 | 70 6c 61 79 50 61 74 74 |App.fDis|playPatt|
|000015a0| 65 72 6e 20 3d 20 22 52 | 61 6e 64 6f 6d 22 20 74 |ern = "R|andom" t|
|000015b0| 68 65 6e 12 52 65 61 64 | 54 6f 64 61 79 73 51 75 |hen.Read|TodaysQu|
|000015c0| 6f 74 65 52 6e 64 04 45 | 6c 73 65 12 52 65 61 64 |oteRnd.E|lse.Read|
|000015d0| 54 6f 64 61 79 73 51 75 | 6f 74 65 53 65 71 06 45 |TodaysQu|oteSeq.E|
|000015e0| 6e 64 20 69 66 00 86 01 | 2f 2f 20 44 69 73 70 6c |nd if...|// Displ|
|000015f0| 61 79 73 20 74 68 65 20 | 71 75 6f 74 65 20 66 69 |ays the |quote fi|
|00001600| 6c 65 27 73 20 74 69 74 | 6c 65 20 28 77 68 61 74 |le's tit|le (what|
|00001610| 65 76 65 72 20 69 73 20 | 69 6e 20 6c 69 6e 65 20 |ever is |in line |
|00001620| 31 20 6f 66 20 74 68 65 | 20 66 69 6c 65 29 0c 44 |1 of the| file).D|
|00001630| 69 73 70 6c 61 79 54 69 | 74 6c 65 00 1a 2f 2f 20 |isplayTi|tle..// |
|00001640| 44 69 73 70 6c 61 79 73 | 20 74 6f 64 61 79 27 73 |Displays| today's|
|00001650| 20 71 75 6f 74 65 20 12 | 44 69 73 70 6c 61 79 54 | quote .|DisplayT|
|00001660| 6f 64 61 79 73 51 75 6f | 74 65 07 45 6e 64 20 53 |odaysQuo|te.End S|
|00001670| 75 62 05 43 6c 6f 73 65 | 02 0e 02 0e 04 0b 53 75 |ub.Close|......Su|
|00001680| 62 20 43 6c 6f 73 65 28 | 29 3a 2f 2f 20 57 68 65 |b Close(|):// Whe|
|00001690| 6e 20 74 68 65 20 77 69 | 6e 64 6f 77 20 63 6c 6f |n the wi|ndow clo|
|000016a0| 73 65 73 2c 20 6d 61 6b | 65 20 73 75 72 65 20 70 |ses, mak|e sure p|
|000016b0| 72 65 66 65 72 65 6e 63 | 65 73 20 61 72 65 20 73 |referenc|es are s|
|000016c0| 61 76 65 64 0e 41 70 70 | 2e 50 72 65 66 73 57 72 |aved.App|.PrefsWr|
|000016d0| 69 74 65 07 45 6e 64 20 | 53 75 62 03 09 41 62 6f |ite.End |Sub..Abo|
|000016e0| 75 74 4d 65 6e 75 01 08 | 01 08 04 1a 46 75 6e 63 |utMenu..|....Func|
|000016f0| 74 69 6f 6e 20 41 63 74 | 69 6f 6e 20 41 73 20 42 |tion Act|ion As B|
|00001700| 6f 6f 6c 65 61 6e 19 2f | 2f 20 4f 70 65 6e 73 20 |oolean./|/ Opens |
|00001710| 74 68 65 20 41 62 6f 75 | 74 20 77 69 6e 64 6f 77 |the Abou|t window|
|00001720| 0d 41 62 6f 75 74 57 69 | 6e 2e 53 68 6f 77 0c 45 |.AboutWi|n.Show.E|
|00001730| 6e 64 20 46 75 6e 63 74 | 69 6f 6e 08 4e 65 78 74 |nd Funct|ion.Next|
|00001740| 4d 65 6e 75 08 1a 08 1a | 0b 1a 46 75 6e 63 74 69 |Menu....|..Functi|
|00001750| 6f 6e 20 41 63 74 69 6f | 6e 20 41 73 20 42 6f 6f |on Actio|n As Boo|
|00001760| 6c 65 61 6e 3f 2f 2f 20 | 4c 6f 61 64 73 20 65 69 |lean?// |Loads ei|
|00001770| 74 68 65 72 20 61 6e 6f | 74 68 65 72 20 72 61 6e |ther ano|ther ran|
|00001780| 64 6f 6d 20 71 75 6f 74 | 65 2c 20 6f 72 20 74 68 |dom quot|e, or th|
|00001790| 65 20 6e 65 78 74 20 71 | 75 6f 74 65 20 69 6e 20 |e next q|uote in |
|000017a0| 6c 69 6e 65 26 49 66 20 | 41 70 70 2e 66 44 69 73 |line&If |App.fDis|
|000017b0| 70 6c 61 79 50 61 74 74 | 65 72 6e 20 3d 20 22 52 |playPatt|ern = "R|
|000017c0| 61 6e 64 6f 6d 22 20 74 | 68 65 6e 12 52 65 61 64 |andom" t|hen.Read|
|000017d0| 54 6f 64 61 79 73 51 75 | 6f 74 65 52 6e 64 04 45 |TodaysQu|oteRnd.E|
|000017e0| 6c 73 65 12 52 65 61 64 | 54 6f 64 61 79 73 51 75 |lse.Read|TodaysQu|
|000017f0| 6f 74 65 53 65 71 06 45 | 6e 64 20 69 66 00 1a 2f |oteSeq.E|nd if../|
|00001800| 2f 20 44 69 73 70 6c 61 | 79 73 20 74 68 65 20 6e |/ Displa|ys the n|
|00001810| 65 77 20 71 75 6f 74 65 | 20 12 44 69 73 70 6c 61 |ew quote| .Displa|
|00001820| 79 54 6f 64 61 79 73 51 | 75 6f 74 65 0c 45 6e 64 |yTodaysQ|uote.End|
|00001830| 20 46 75 6e 63 74 69 6f | 6e 0f 45 64 69 74 50 72 | Functio|n.EditPr|
|00001840| 65 66 65 72 65 6e 63 65 | 73 01 1f 01 1f 04 1a 46 |eference|s......F|
|00001850| 75 6e 63 74 69 6f 6e 20 | 41 63 74 69 6f 6e 20 41 |unction |Action A|
|00001860| 73 20 42 6f 6f 6c 65 61 | 6e 1f 2f 2f 20 4f 70 65 |s Boolea|n.// Ope|
|00001870| 6e 73 20 74 68 65 20 50 | 72 65 66 65 72 65 6e 63 |ns the P|referenc|
|00001880| 65 73 20 77 69 6e 64 6f | 77 0c 50 72 65 66 57 69 |es windo|w.PrefWi|
|00001890| 6e 2e 53 68 6f 77 0c 45 | 6e 64 20 46 75 6e 63 74 |n.Show.E|nd Funct|
|000018a0| 69 6f 6e 00 05 07 00 00 | a8 01 09 52 65 63 74 61 |ion.....|...Recta|
|000018b0| 6e 67 6c 65 00 00 00 00 | 00 00 00 07 00 00 b4 01 |ngle....|........|
|000018c0| 0a 50 75 73 68 42 75 74 | 74 6f 6e 00 00 00 00 01 |.PushBut|ton.....|
|000018d0| 06 41 63 74 69 6f 6e 02 | 28 02 28 05 0c 53 75 62 |.Action.|(.(..Sub|
|000018e0| 20 41 63 74 69 6f 6e 28 | 29 37 2f 2f 20 43 6c 6f | Action(|)7// Clo|
|000018f0| 73 65 20 61 63 74 75 61 | 6c 6c 79 20 71 75 69 74 |se actua|lly quit|
|00001900| 73 20 74 68 65 20 61 70 | 70 6c 69 63 61 74 69 6f |s the ap|plicatio|
|00001910| 6e 20 65 6e 74 69 72 65 | 6c 79 20 73 69 6e 63 65 |n entire|ly since|
|00001920| 20 28 2f 2f 20 74 68 69 | 73 20 61 70 70 20 63 61 | (// thi|s app ca|
|00001930| 6e 27 74 20 68 61 76 65 | 20 61 20 6e 6f 2d 77 69 |n't have| a no-wi|
|00001940| 6e 64 6f 77 20 73 74 61 | 74 65 04 51 75 69 74 07 |ndow sta|te.Quit.|
|00001950| 45 6e 64 20 53 75 62 00 | 00 07 00 00 88 02 10 4e |End Sub.|.......N|
|00001960| 6f 43 6c 65 61 72 43 6f | 70 79 50 61 73 74 65 00 |oClearCo|pyPaste.|
|00001970| 00 00 00 01 07 4b 65 79 | 44 6f 77 6e 09 03 09 03 |.....Key|Down....|
|00001980| 0b 2a 46 75 6e 63 74 69 | 6f 6e 20 4b 65 79 44 6f |.*Functi|on KeyDo|
|00001990| 77 6e 28 4b 65 79 20 41 | 73 20 53 74 72 69 6e 67 |wn(Key A|s String|
|000019a0| 29 20 41 73 20 42 6f 6f | 6c 65 61 6e 83 01 2f 2f |) As Boo|lean..//|
|000019b0| 20 42 65 63 61 75 73 65 | 20 74 68 69 73 20 66 69 | Because| this fi|
|000019c0| 65 6c 64 20 74 72 61 70 | 73 20 74 68 65 20 6b 65 |eld trap|s the ke|
|000019d0| 79 44 6f 77 6e 20 65 76 | 65 6e 74 73 2c 20 68 61 |yDown ev|ents, ha|
|000019e0| 76 69 6e 67 20 74 68 65 | 20 22 43 6c 6f 73 65 22 |ving the| "Close"|
|000019f0| 20 86 01 2f 2f 20 62 75 | 74 74 6f 6e 20 61 73 20 | ..// bu|tton as |
|00001a00| 74 68 65 20 64 65 66 61 | 75 6c 74 20 72 65 61 6c |the defa|ult real|
|00001a10| 6c 79 20 64 6f 65 73 6e | 27 74 20 64 6f 20 61 6e |ly doesn|'t do an|
|00001a20| 79 74 68 69 6e 67 2e 20 | 54 68 69 73 20 66 69 65 |ything. |This fie|
|00001a30| 6c 64 20 74 72 61 70 73 | 20 1d 2f 2f 20 74 68 65 |ld traps| .// the|
|00001a40| 20 52 65 74 75 72 6e 20 | 61 6e 64 20 45 6e 74 65 | Return |and Ente|
|00001a50| 72 20 6b 65 79 73 2e 83 | 01 2f 2f 20 54 6f 20 67 |r keys..|.// To g|
|00001a60| 65 74 20 61 72 6f 75 6e | 64 20 74 68 69 73 20 61 |et aroun|d this a|
|00001a70| 6e 64 20 70 72 6f 76 69 | 64 65 20 74 68 65 20 69 |nd provi|de the i|
|00001a80| 6c 6c 75 73 69 6f 6e 20 | 6f 66 20 61 20 64 65 66 |llusion |of a def|
|00001a90| 61 75 6c 74 20 62 75 74 | 74 6f 6e 20 80 01 2f 2f |ault but|ton ..//|
|00001aa0| 20 73 74 61 74 65 2c 20 | 63 68 65 63 6b 20 74 68 | state, |check th|
|00001ab0| 65 20 6b 65 79 44 6f 77 | 6e 20 61 6e 64 20 69 66 |e keyDow|n and if|
|00001ac0| 20 74 68 65 79 27 72 65 | 20 52 65 74 75 72 6e 20 | they're| Return |
|00001ad0| 6f 72 20 45 6e 74 65 72 | 20 74 68 65 6e 20 2a 2f |or Enter| then */|
|00001ae0| 2f 20 62 65 68 61 76 65 | 20 61 73 20 69 66 20 74 |/ behave| as if t|
|00001af0| 68 65 20 43 6c 6f 73 65 | 20 62 74 6e 20 77 65 72 |he Close| btn wer|
|00001b00| 65 20 63 6c 69 63 6b 65 | 64 29 49 66 20 41 73 63 |e clicke|d)If Asc|
|00001b10| 28 20 4b 65 79 20 29 20 | 3d 20 33 20 6f 72 20 41 |( Key ) |= 3 or A|
|00001b20| 73 63 28 20 4b 65 79 20 | 29 20 3d 20 31 33 20 74 |sc( Key |) = 13 t|
|00001b30| 68 65 6e 04 51 75 69 74 | 06 45 6e 64 20 69 66 0c |hen.Quit|.End if.|
|00001b40| 45 6e 64 20 46 75 6e 63 | 74 69 6f 6e 00 00 07 00 |End Func|tion....|
|00001b50| 00 b4 01 0a 53 74 61 74 | 69 63 54 65 78 74 00 00 |....Stat|icText..|
|00001b60| 00 00 02 0a 4d 6f 75 73 | 65 45 6e 74 65 72 01 00 |....Mous|eEnter..|
|00001b70| 01 00 03 10 53 75 62 20 | 4d 6f 75 73 65 45 6e 74 |....Sub |MouseEnt|
|00001b80| 65 72 28 29 00 07 45 6e | 64 20 53 75 62 09 4d 6f |er()..En|d Sub.Mo|
|00001b90| 75 73 65 4d 6f 76 65 01 | 00 01 00 03 29 53 75 62 |useMove.|....)Sub|
|00001ba0| 20 4d 6f 75 73 65 4d 6f | 76 65 28 58 20 41 73 20 | MouseMo|ve(X As |
|00001bb0| 49 6e 74 65 67 65 72 2c | 20 59 20 41 73 20 49 6e |Integer,| Y As In|
|00001bc0| 74 65 67 65 72 29 00 07 | 45 6e 64 20 53 75 62 00 |teger)..|End Sub.|
|00001bd0| 00 07 00 00 b4 01 0a 53 | 74 61 74 69 63 54 65 78 |.......S|taticTex|
|00001be0| 74 00 00 00 00 01 09 4d | 6f 75 73 65 4d 6f 76 65 |t......M|ouseMove|
|00001bf0| 01 00 01 00 03 29 53 75 | 62 20 4d 6f 75 73 65 4d |.....)Su|b MouseM|
|00001c00| 6f 76 65 28 58 20 41 73 | 20 49 6e 74 65 67 65 72 |ove(X As| Integer|
|00001c10| 2c 20 59 20 41 73 20 49 | 6e 74 65 67 65 72 29 00 |, Y As I|nteger).|
|00001c20| 07 45 6e 64 20 53 75 62 | 00 00 05 09 52 65 63 74 |.End Sub|....Rect|
|00001c30| 61 6e 67 6c 65 12 04 4e | 61 6d 65 0a 52 65 63 74 |angle..N|ame.Rect|
|00001c40| 61 6e 67 6c 65 31 05 49 | 6e 64 65 78 0b 2d 32 31 |angle1.I|ndex.-21|
|00001c50| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|00001c60| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|00001c70| 04 54 72 75 65 04 4c 65 | 66 74 02 31 33 03 54 6f |.True.Le|ft.13.To|
|00001c80| 70 02 33 35 05 57 69 64 | 74 68 03 32 37 34 06 48 |p.35.Wid|th.274.H|
|00001c90| 65 69 67 68 74 03 31 30 | 36 0b 42 61 6c 6c 6f 6f |eight.10|6.Balloo|
|00001ca0| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|00001cb0| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00001cc0| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|00001cd0| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|00001ce0| 68 74 05 46 61 6c 73 65 | 0a 4c 6f 63 6b 42 6f 74 |ht.False|.LockBot|
|00001cf0| 74 6f 6d 05 46 61 6c 73 | 65 09 46 69 6c 6c 43 6f |tom.Fals|e.FillCo|
|00001d00| 6c 6f 72 08 31 36 37 37 | 37 32 31 35 0b 42 6f 72 |lor.1677|7215.Bor|
|00001d10| 64 65 72 57 69 64 74 68 | 01 33 0c 54 6f 70 4c 65 |derWidth|.3.TopLe|
|00001d20| 66 74 43 6f 6c 6f 72 07 | 38 33 35 35 37 31 31 10 |ftColor.|8355711.|
|00001d30| 42 6f 74 74 6f 6d 52 69 | 67 68 74 43 6f 6c 6f 72 |BottomRi|ghtColor|
|00001d40| 08 31 32 35 36 36 34 36 | 33 00 0a 50 75 73 68 42 |.1256646|3..PushB|
|00001d50| 75 74 74 6f 6e 17 04 4e | 61 6d 65 08 43 6c 6f 73 |utton..N|ame.Clos|
|00001d60| 65 42 74 6e 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |eBtn.Ind|ex.-2147|
|00001d70| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|00001d80| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|00001d90| 72 75 65 04 4c 65 66 74 | 03 32 32 37 03 54 6f 70 |rue.Left|.227.Top|
|00001da0| 03 31 35 33 05 57 69 64 | 74 68 02 36 30 06 48 65 |.153.Wid|th.60.He|
|00001db0| 69 67 68 74 02 32 30 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.20.|BalloonH|
|00001dc0| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|00001dd0| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|00001de0| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|00001df0| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|00001e00| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|00001e10| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|00001e20| 06 53 79 73 74 65 6d 08 | 54 65 78 74 53 69 7a 65 |.System.|TextSize|
|00001e30| 02 31 32 04 42 6f 6c 64 | 05 46 61 6c 73 65 06 49 |.12.Bold|.False.I|
|00001e40| 74 61 6c 69 63 05 46 61 | 6c 73 65 09 55 6e 64 65 |talic.Fa|lse.Unde|
|00001e50| 72 6c 69 6e 65 05 46 61 | 6c 73 65 07 43 61 70 74 |rline.Fa|lse.Capt|
|00001e60| 69 6f 6e 05 43 6c 6f 73 | 65 07 44 65 66 61 75 6c |ion.Clos|e.Defaul|
|00001e70| 74 04 54 72 75 65 06 43 | 61 6e 63 65 6c 05 46 61 |t.True.C|ancel.Fa|
|00001e80| 6c 73 65 07 45 6e 61 62 | 6c 65 64 04 54 72 75 65 |lse.Enab|led.True|
|00001e90| 01 09 45 64 69 74 46 69 | 65 6c 64 20 04 4e 61 6d |..EditFi|eld .Nam|
|00001ea0| 65 08 51 75 6f 74 65 46 | 6c 64 05 49 6e 64 65 78 |e.QuoteF|ld.Index|
|00001eb0| 0b 2d 32 31 34 37 34 38 | 33 36 34 38 0d 54 61 62 |.-214748|3648.Tab|
|00001ec0| 50 61 6e 65 6c 49 6e 64 | 65 78 01 30 07 56 69 73 |PanelInd|ex.0.Vis|
|00001ed0| 69 62 6c 65 04 54 72 75 | 65 04 4c 65 66 74 02 31 |ible.Tru|e.Left.1|
|00001ee0| 38 03 54 6f 70 02 33 38 | 05 57 69 64 74 68 03 32 |8.Top.38|.Width.2|
|00001ef0| 36 36 06 48 65 69 67 68 | 74 03 31 30 31 0b 42 61 |66.Heigh|t.101.Ba|
|00001f00| 6c 6c 6f 6f 6e 48 65 6c | 70 00 13 44 69 73 61 62 |lloonHel|p..Disab|
|00001f10| 6c 65 64 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 08 |ledBallo|onHelp..|
|00001f20| 4c 6f 63 6b 4c 65 66 74 | 04 54 72 75 65 07 4c 6f |LockLeft|.True.Lo|
|00001f30| 63 6b 54 6f 70 04 54 72 | 75 65 09 4c 6f 63 6b 52 |ckTop.Tr|ue.LockR|
|00001f40| 69 67 68 74 05 46 61 6c | 73 65 0a 4c 6f 63 6b 42 |ight.Fal|se.LockB|
|00001f50| 6f 74 74 6f 6d 05 46 61 | 6c 73 65 08 54 65 78 74 |ottom.Fa|lse.Text|
|00001f60| 46 6f 6e 74 06 4d 6f 6e | 61 63 6f 08 54 65 78 74 |Font.Mon|aco.Text|
|00001f70| 53 69 7a 65 01 39 04 42 | 6f 6c 64 05 46 61 6c 73 |Size.9.B|old.Fals|
|00001f80| 65 06 49 74 61 6c 69 63 | 05 46 61 6c 73 65 09 55 |e.Italic|.False.U|
|00001f90| 6e 64 65 72 6c 69 6e 65 | 05 46 61 6c 73 65 06 42 |nderline|.False.B|
|00001fa0| 6f 72 64 65 72 05 46 61 | 6c 73 65 09 4d 75 6c 74 |order.Fa|lse.Mult|
|00001fb0| 69 4c 69 6e 65 04 54 72 | 75 65 09 53 63 72 6f 6c |iLine.Tr|ue.Scrol|
|00001fc0| 6c 42 61 72 04 54 72 75 | 65 06 53 74 79 6c 65 64 |lBar.Tru|e.Styled|
|00001fd0| 05 46 61 6c 73 65 08 50 | 61 73 73 77 6f 72 64 05 |.False.P|assword.|
|00001fe0| 46 61 6c 73 65 0c 55 73 | 65 46 6f 63 75 73 52 69 |False.Us|eFocusRi|
|00001ff0| 6e 67 04 54 72 75 65 08 | 52 65 61 64 4f 6e 6c 79 |ng.True.|ReadOnly|
|00002000| 05 46 61 6c 73 65 09 4c | 69 6d 69 74 54 65 78 74 |.False.L|imitText|
|00002010| 01 30 0a 41 63 63 65 70 | 74 54 61 62 73 05 46 61 |.0.Accep|tTabs.Fa|
|00002020| 6c 73 65 09 54 65 78 74 | 43 6f 6c 6f 72 01 30 09 |lse.Text|Color.0.|
|00002030| 42 61 63 6b 43 6f 6c 6f | 72 08 31 36 37 37 37 32 |BackColo|r.167772|
|00002040| 31 35 07 45 6e 61 62 6c | 65 64 04 54 72 75 65 04 |15.Enabl|ed.True.|
|00002050| 54 65 78 74 00 02 0a 53 | 74 61 74 69 63 54 65 78 |Text...S|taticTex|
|00002060| 74 17 04 4e 61 6d 65 07 | 44 61 74 65 42 6f 78 05 |t..Name.|DateBox.|
|00002070| 49 6e 64 65 78 0b 2d 32 | 31 34 37 34 38 33 36 34 |Index.-2|14748364|
|00002080| 38 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |8.TabPan|elIndex.|
|00002090| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|000020a0| 65 66 74 02 31 33 03 54 | 6f 70 03 31 35 33 05 57 |eft.13.T|op.153.W|
|000020b0| 69 64 74 68 03 31 37 39 | 06 48 65 69 67 68 74 02 |idth.179|.Height.|
|000020c0| 31 38 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |18.Ballo|onHelp..|
|000020d0| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|000020e0| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|000020f0| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00002100| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00002110| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|00002120| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 53 79 73 74 |se.TextF|ont.Syst|
|00002130| 65 6d 08 54 65 78 74 53 | 69 7a 65 02 31 32 04 42 |em.TextS|ize.12.B|
|00002140| 6f 6c 64 05 46 61 6c 73 | 65 06 49 74 61 6c 69 63 |old.Fals|e.Italic|
|00002150| 05 46 61 6c 73 65 09 55 | 6e 64 65 72 6c 69 6e 65 |.False.U|nderline|
|00002160| 05 46 61 6c 73 65 04 54 | 65 78 74 04 44 61 74 65 |.False.T|ext.Date|
|00002170| 09 54 65 78 74 41 6c 69 | 67 6e 01 30 09 54 65 78 |.TextAli|gn.0.Tex|
|00002180| 74 43 6f 6c 6f 72 01 30 | 09 4d 75 6c 74 69 4c 69 |tColor.0|.MultiLi|
|00002190| 6e 65 05 46 61 6c 73 65 | 03 0a 53 74 61 74 69 63 |ne.False|..Static|
|000021a0| 54 65 78 74 17 04 4e 61 | 6d 65 08 54 69 74 6c 65 |Text..Na|me.Title|
|000021b0| 42 6f 78 05 49 6e 64 65 | 78 0b 2d 32 31 34 37 34 |Box.Inde|x.-21474|
|000021c0| 38 33 36 34 38 0d 54 61 | 62 50 61 6e 65 6c 49 6e |83648.Ta|bPanelIn|
|000021d0| 64 65 78 01 30 07 56 69 | 73 69 62 6c 65 04 54 72 |dex.0.Vi|sible.Tr|
|000021e0| 75 65 04 4c 65 66 74 02 | 31 33 03 54 6f 70 02 31 |ue.Left.|13.Top.1|
|000021f0| 32 05 57 69 64 74 68 03 | 32 37 31 06 48 65 69 67 |2.Width.|271.Heig|
|00002200| 68 74 02 31 36 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |ht.16.Ba|lloonHel|
|00002210| 70 00 13 44 69 73 61 62 | 6c 65 64 42 61 6c 6c 6f |p..Disab|ledBallo|
|00002220| 6f 6e 48 65 6c 70 00 08 | 4c 6f 63 6b 4c 65 66 74 |onHelp..|LockLeft|
|00002230| 05 46 61 6c 73 65 07 4c | 6f 63 6b 54 6f 70 05 46 |.False.L|ockTop.F|
|00002240| 61 6c 73 65 09 4c 6f 63 | 6b 52 69 67 68 74 05 46 |alse.Loc|kRight.F|
|00002250| 61 6c 73 65 0a 4c 6f 63 | 6b 42 6f 74 74 6f 6d 05 |alse.Loc|kBottom.|
|00002260| 46 61 6c 73 65 08 54 65 | 78 74 46 6f 6e 74 06 53 |False.Te|xtFont.S|
|00002270| 79 73 74 65 6d 08 54 65 | 78 74 53 69 7a 65 02 31 |ystem.Te|xtSize.1|
|00002280| 32 04 42 6f 6c 64 05 46 | 61 6c 73 65 06 49 74 61 |2.Bold.F|alse.Ita|
|00002290| 6c 69 63 05 46 61 6c 73 | 65 09 55 6e 64 65 72 6c |lic.Fals|e.Underl|
|000022a0| 69 6e 65 05 46 61 6c 73 | 65 04 54 65 78 74 05 54 |ine.Fals|e.Text.T|
|000022b0| 69 74 6c 65 09 54 65 78 | 74 41 6c 69 67 6e 01 30 |itle.Tex|tAlign.0|
|000022c0| 09 54 65 78 74 43 6f 6c | 6f 72 01 30 09 4d 75 6c |.TextCol|or.0.Mul|
|000022d0| 74 69 4c 69 6e 65 05 46 | 61 6c 73 65 04 00 02 41 |tiLine.F|alse...A|
|000022e0| 04 4d 65 6e 75 04 4d 65 | 6e 75 05 a2 01 80 05 8e |.Menu.Me|nu......|
|000022f0| 06 88 08 04 01 00 00 80 | 80 80 80 10 00 00 00 00 |........|........|
|00002300| 00 07 00 00 88 01 08 4d | 65 6e 75 49 74 65 6d 00 |.......M|enuItem.|
|00002310| 00 00 00 00 00 00 02 00 | 11 41 62 6f 75 74 20 51 |........|.About Q|
|00002320| 75 6f 74 65 20 54 68 69 | 6e 67 09 41 62 6f 75 74 |uote Thi|ng.About|
|00002330| 4d 65 6e 75 80 80 80 80 | 10 00 00 00 00 00 07 00 |Menu....|........|
|00002340| 00 88 01 08 4d 65 6e 75 | 49 74 65 6d 00 00 00 00 |....Menu|Item....|
|00002350| 00 00 00 00 02 00 00 80 | 80 80 80 10 00 00 00 00 |........|........|
|00002360| 00 07 00 00 88 01 08 4d | 65 6e 75 49 74 65 6d 00 |.......M|enuItem.|
|00002370| 00 00 00 00 00 00 00 00 | 04 46 69 6c 65 00 80 80 |........|.File...|
|00002380| 80 80 10 00 00 00 00 00 | 07 00 00 88 01 08 4d 65 |........|......Me|
|00002390| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 04 00 0a |nuItem..|........|
|000023a0| 4e 65 78 74 20 51 75 6f | 74 65 08 4e 65 78 74 4d |Next Quo|te.NextM|
|000023b0| 65 6e 75 80 80 80 80 10 | 01 4e 00 00 00 00 07 00 |enu.....|.N......|
|000023c0| 00 88 01 08 4d 65 6e 75 | 49 74 65 6d 00 00 00 00 |....Menu|Item....|
|000023d0| 00 00 00 00 00 01 2d 00 | 80 80 80 80 10 00 00 00 |......-.|........|
|000023e0| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|000023f0| 00 00 00 00 00 00 00 00 | 00 04 51 75 69 74 08 46 |........|..Quit.F|
|00002400| 69 6c 65 51 75 69 74 80 | 80 80 80 10 01 51 00 00 |ileQuit.|.....Q..|
|00002410| 00 00 07 00 00 88 01 0c | 51 75 69 74 4d 65 6e 75 |........|QuitMenu|
|00002420| 49 74 65 6d 00 00 00 00 | 00 00 00 00 02 00 00 80 |Item....|........|
|00002430| 80 80 80 10 00 00 00 00 | 00 07 00 00 88 01 08 4d |........|.......M|
|00002440| 65 6e 75 49 74 65 6d 00 | 00 00 00 00 00 00 00 00 |enuItem.|........|
|00002450| 04 45 64 69 74 00 80 80 | 80 80 10 00 00 00 00 00 |.Edit...|........|
|00002460| 07 00 00 88 01 08 4d 65 | 6e 75 49 74 65 6d 00 00 |......Me|nuItem..|
|00002470| 00 00 00 00 00 09 00 04 | 55 6e 64 6f 08 45 64 69 |........|Undo.Edi|
|00002480| 74 55 6e 64 6f 80 80 80 | 80 10 01 5a 00 00 00 00 |tUndo...|...Z....|
|00002490| 07 00 00 88 01 08 4d 65 | 6e 75 49 74 65 6d 00 00 |......Me|nuItem..|
|000024a0| 00 00 00 00 00 00 00 01 | 2d 00 80 80 80 80 10 00 |........|-.......|
|000024b0| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|000024c0| 65 6d 00 00 00 00 00 00 | 00 00 00 03 43 75 74 07 |em......|....Cut.|
|000024d0| 45 64 69 74 43 75 74 80 | 80 80 80 10 01 58 00 00 |EditCut.|.....X..|
|000024e0| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|000024f0| 00 00 00 00 00 00 00 00 | 00 04 43 6f 70 79 08 45 |........|..Copy.E|
|00002500| 64 69 74 43 6f 70 79 80 | 80 80 80 10 01 43 00 00 |ditCopy.|.....C..|
|00002510| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|00002520| 00 00 00 00 00 00 00 00 | 00 05 50 61 73 74 65 09 |........|..Paste.|
|00002530| 45 64 69 74 50 61 73 74 | 65 80 80 80 80 10 01 56 |EditPast|e......V|
|00002540| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00002550| 65 6d 00 00 00 00 00 00 | 00 00 00 05 43 6c 65 61 |em......|....Clea|
|00002560| 72 09 45 64 69 74 43 6c | 65 61 72 80 80 80 80 10 |r.EditCl|ear.....|
|00002570| 00 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |........|...MenuI|
|00002580| 74 65 6d 00 00 00 00 00 | 00 00 00 00 01 2d 00 80 |tem.....|.....-..|
|00002590| 80 80 80 10 00 00 00 00 | 00 07 00 00 88 01 08 4d |........|.......M|
|000025a0| 65 6e 75 49 74 65 6d 00 | 00 00 00 00 00 00 00 00 |enuItem.|........|
|000025b0| 0b 50 72 65 66 65 72 65 | 6e 63 65 73 0f 45 64 69 |.Prefere|nces.Edi|
|000025c0| 74 50 72 65 66 65 72 65 | 6e 63 65 73 80 80 80 80 |tPrefere|nces....|
|000025d0| 10 00 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |........|....Menu|
|000025e0| 49 74 65 6d 00 00 00 00 | 00 00 00 00 02 00 00 80 |Item....|........|
|000025f0| 80 80 80 10 00 00 00 00 | 00 07 00 00 88 01 08 4d |........|.......M|
|00002600| 65 6e 75 49 74 65 6d 00 | 00 00 00 00 00 00 00 02 |enuItem.|........|
|00002610| 00 00 80 80 80 80 10 00 | 00 00 00 00 07 00 00 88 |........|........|
|00002620| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|00002630| 00 00 03 41 04 56 69 65 | 77 08 41 62 6f 75 74 57 |...A.Vie|w.AboutW|
|00002640| 69 6e 04 bd 01 a1 04 12 | 04 4e 61 6d 65 08 41 62 |in......|.Name.Ab|
|00002650| 6f 75 74 57 69 6e 05 46 | 72 61 6d 65 01 32 0c 48 |outWin.F|rame.2.H|
|00002660| 61 73 42 61 63 6b 43 6f | 6c 6f 72 05 46 61 6c 73 |asBackCo|lor.Fals|
|00002670| 65 09 42 61 63 6b 43 6f | 6c 6f 72 08 31 36 37 37 |e.BackCo|lor.1677|
|00002680| 37 32 31 35 08 42 61 63 | 6b 64 72 6f 70 02 31 33 |7215.Bac|kdrop.13|
|00002690| 05 54 69 74 6c 65 12 41 | 62 6f 75 74 20 44 61 69 |.Title.A|bout Dai|
|000026a0| 6c 79 20 51 75 6f 74 65 | 72 07 56 69 73 69 62 6c |ly Quote|r.Visibl|
|000026b0| 65 04 54 72 75 65 08 43 | 6c 6f 73 65 42 6f 78 04 |e.True.C|loseBox.|
|000026c0| 54 72 75 65 08 47 72 6f | 77 49 63 6f 6e 04 54 72 |True.Gro|wIcon.Tr|
|000026d0| 75 65 08 5a 6f 6f 6d 49 | 63 6f 6e 04 54 72 75 65 |ue.ZoomI|con.True|
|000026e0| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 09 50 6c |.Balloon|Help..Pl|
|000026f0| 61 63 65 6d 65 6e 74 01 | 30 05 57 69 64 74 68 03 |acement.|0.Width.|
|00002700| 32 36 30 06 48 65 69 67 | 68 74 03 32 30 30 08 4d |260.Heig|ht.200.M|
|00002710| 69 6e 57 69 64 74 68 02 | 36 34 09 4d 69 6e 48 65 |inWidth.|64.MinHe|
|00002720| 69 67 68 74 02 36 34 08 | 4d 61 78 57 69 64 74 68 |ight.64.|MaxWidth|
|00002730| 05 33 32 30 30 30 09 4d | 61 78 48 65 69 67 68 74 |.32000.M|axHeight|
|00002740| 05 33 32 30 30 30 07 00 | 08 41 62 6f 75 74 57 69 |.32000..|.AboutWi|
|00002750| 6e ac 01 06 44 69 61 6c | 6f 67 00 00 00 00 00 00 |n...Dial|og......|
|00002760| 00 03 07 00 00 a4 01 06 | 43 61 6e 76 61 73 00 00 |........|Canvas..|
|00002770| 00 00 00 00 00 07 00 00 | b4 01 0a 50 75 73 68 42 |........|...PushB|
|00002780| 75 74 74 6f 6e 00 00 00 | 00 01 06 41 63 74 69 6f |utton...|...Actio|
|00002790| 6e 02 0e 02 00 04 0c 53 | 75 62 20 41 63 74 69 6f |n......S|ub Actio|
|000027a0| 6e 28 29 19 2f 2f 20 43 | 6c 6f 73 65 20 74 68 65 |n().// C|lose the|
|000027b0| 20 41 62 6f 75 74 20 77 | 69 6e 64 6f 77 0e 41 62 | About w|indow.Ab|
|000027c0| 6f 75 74 57 69 6e 2e 43 | 6c 6f 73 65 07 45 6e 64 |outWin.C|lose.End|
|000027d0| 20 53 75 62 00 00 07 00 | 00 a4 01 06 43 61 6e 76 | Sub....|....Canv|
|000027e0| 61 73 00 00 00 00 03 07 | 4d 6f 75 73 65 55 70 05 |as......|MouseUp.|
|000027f0| 0e 05 0e 0a 27 53 75 62 | 20 4d 6f 75 73 65 55 70 |....'Sub| MouseUp|
|00002800| 28 58 20 41 73 20 49 6e | 74 65 67 65 72 2c 20 59 |(X As In|teger, Y|
|00002810| 20 41 73 20 49 6e 74 65 | 67 65 72 29 15 4d 65 2e | As Inte|ger).Me.|
|00002820| 42 61 63 6b 64 72 6f 70 | 20 3d 20 42 6c 75 65 55 |Backdrop| = BlueU|
|00002830| 52 4c 00 3d 2f 2f 20 53 | 69 6e 63 65 20 74 68 69 |RL.=// S|ince thi|
|00002840| 73 20 69 73 20 61 20 6d | 6f 64 61 6c 20 77 69 6e |s is a m|odal win|
|00002850| 64 6f 77 2c 20 6e 65 65 | 64 20 74 6f 20 63 6c 6f |dow, nee|d to clo|
|00002860| 73 65 20 69 74 20 62 65 | 66 6f 72 65 20 74 68 65 |se it be|fore the|
|00002870| 20 17 2f 2f 20 77 65 62 | 20 62 72 6f 77 73 65 72 | .// web| browser|
|00002880| 20 63 61 6e 20 6f 70 65 | 6e 0e 41 62 6f 75 74 57 | can ope|n.AboutW|
|00002890| 69 6e 2e 43 6c 6f 73 65 | 00 15 2f 2f 20 47 6f 20 |in.Close|..// Go |
|000028a0| 74 6f 20 74 68 65 20 77 | 65 62 20 70 61 67 65 24 |to the w|eb page$|
|000028b0| 53 68 6f 77 55 52 4c 20 | 22 68 74 74 70 3a 2f 2f |ShowURL |"http://|
|000028c0| 77 77 77 2e 70 6f 73 74 | 61 6c 2d 63 6f 64 65 2e |www.post|al-code.|
|000028d0| 63 6f 6d 22 07 45 6e 64 | 20 53 75 62 09 4d 6f 75 |com".End| Sub.Mou|
|000028e0| 73 65 44 6f 77 6e 02 0b | 02 0b 04 39 46 75 6e 63 |seDown..|...9Func|
|000028f0| 74 69 6f 6e 20 4d 6f 75 | 73 65 44 6f 77 6e 28 58 |tion Mou|seDown(X|
|00002900| 20 41 73 20 49 6e 74 65 | 67 65 72 2c 20 59 20 41 | As Inte|ger, Y A|
|00002910| 73 20 49 6e 74 65 67 65 | 72 29 20 41 73 20 42 6f |s Intege|r) As Bo|
|00002920| 6f 6c 65 61 6e 14 4d 65 | 2e 42 61 63 6b 64 72 6f |olean.Me|.Backdro|
|00002930| 70 20 3d 20 52 65 64 55 | 52 4c 0b 72 65 74 75 72 |p = RedU|RL.retur|
|00002940| 6e 20 54 52 55 45 0c 45 | 6e 64 20 46 75 6e 63 74 |n TRUE.E|nd Funct|
|00002950| 69 6f 6e 05 50 61 69 6e | 74 01 00 01 00 03 18 53 |ion.Pain|t......S|
|00002960| 75 62 20 50 61 69 6e 74 | 28 67 20 41 73 20 47 72 |ub Paint|(g As Gr|
|00002970| 61 70 68 69 63 73 29 00 | 07 45 6e 64 20 53 75 62 |aphics).|.End Sub|
|00002980| 00 00 03 06 43 61 6e 76 | 61 73 10 04 4e 61 6d 65 |....Canv|as..Name|
|00002990| 07 43 61 6e 76 61 73 31 | 05 49 6e 64 65 78 0b 2d |.Canvas1|.Index.-|
|000029a0| 32 31 34 37 34 38 33 36 | 34 38 0d 54 61 62 50 61 |21474836|48.TabPa|
|000029b0| 6e 65 6c 49 6e 64 65 78 | 01 30 07 56 69 73 69 62 |nelIndex|.0.Visib|
|000029c0| 6c 65 04 54 72 75 65 04 | 4c 65 66 74 01 30 03 54 |le.True.|Left.0.T|
|000029d0| 6f 70 01 30 05 57 69 64 | 74 68 03 32 36 30 06 48 |op.0.Wid|th.260.H|
|000029e0| 65 69 67 68 74 03 32 30 | 30 0b 42 61 6c 6c 6f 6f |eight.20|0.Balloo|
|000029f0| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|00002a00| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00002a10| 4c 65 66 74 04 54 72 75 | 65 07 4c 6f 63 6b 54 6f |Left.Tru|e.LockTo|
|00002a20| 70 04 54 72 75 65 09 4c | 6f 63 6b 52 69 67 68 74 |p.True.L|ockRight|
|00002a30| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|00002a40| 6d 05 46 61 6c 73 65 08 | 42 61 63 6b 64 72 6f 70 |m.False.|Backdrop|
|00002a50| 02 31 32 07 45 6e 61 62 | 6c 65 64 04 54 72 75 65 |.12.Enab|led.True|
|00002a60| 00 0a 50 75 73 68 42 75 | 74 74 6f 6e 17 04 4e 61 |..PushBu|tton..Na|
|00002a70| 6d 65 0b 50 75 73 68 42 | 75 74 74 6f 6e 31 05 49 |me.PushB|utton1.I|
|00002a80| 6e 64 65 78 0b 2d 32 31 | 34 37 34 38 33 36 34 38 |ndex.-21|47483648|
|00002a90| 0d 54 61 62 50 61 6e 65 | 6c 49 6e 64 65 78 01 30 |.TabPane|lIndex.0|
|00002aa0| 07 56 69 73 69 62 6c 65 | 04 54 72 75 65 04 4c 65 |.Visible|.True.Le|
|00002ab0| 66 74 03 31 39 31 03 54 | 6f 70 02 31 33 05 57 69 |ft.191.T|op.13.Wi|
|00002ac0| 64 74 68 02 36 30 06 48 | 65 69 67 68 74 02 32 30 |dth.60.H|eight.20|
|00002ad0| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 13 44 69 |.Balloon|Help..Di|
|00002ae0| 73 61 62 6c 65 64 42 61 | 6c 6c 6f 6f 6e 48 65 6c |sabledBa|lloonHel|
|00002af0| 70 00 08 4c 6f 63 6b 4c | 65 66 74 05 46 61 6c 73 |p..LockL|eft.Fals|
|00002b00| 65 07 4c 6f 63 6b 54 6f | 70 05 46 61 6c 73 65 09 |e.LockTo|p.False.|
|00002b10| 4c 6f 63 6b 52 69 67 68 | 74 05 46 61 6c 73 65 0a |LockRigh|t.False.|
|00002b20| 4c 6f 63 6b 42 6f 74 74 | 6f 6d 05 46 61 6c 73 65 |LockBott|om.False|
|00002b30| 08 54 65 78 74 46 6f 6e | 74 06 53 79 73 74 65 6d |.TextFon|t.System|
|00002b40| 08 54 65 78 74 53 69 7a | 65 02 31 32 04 42 6f 6c |.TextSiz|e.12.Bol|
|00002b50| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|00002b60| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|00002b70| 61 6c 73 65 07 43 61 70 | 74 69 6f 6e 02 4f 6b 07 |alse.Cap|tion.Ok.|
|00002b80| 44 65 66 61 75 6c 74 04 | 54 72 75 65 06 43 61 6e |Default.|True.Can|
|00002b90| 63 65 6c 05 46 61 6c 73 | 65 07 45 6e 61 62 6c 65 |cel.Fals|e.Enable|
|00002ba0| 64 04 54 72 75 65 01 06 | 43 61 6e 76 61 73 10 04 |d.True..|Canvas..|
|00002bb0| 4e 61 6d 65 07 43 61 6e | 76 61 73 32 05 49 6e 64 |Name.Can|vas2.Ind|
|00002bc0| 65 78 0b 2d 32 31 34 37 | 34 38 33 36 34 38 0d 54 |ex.-2147|483648.T|
|00002bd0| 61 62 50 61 6e 65 6c 49 | 6e 64 65 78 01 30 07 56 |abPanelI|ndex.0.V|
|00002be0| 69 73 69 62 6c 65 04 54 | 72 75 65 04 4c 65 66 74 |isible.T|rue.Left|
|00002bf0| 02 33 38 03 54 6f 70 03 | 31 38 34 05 57 69 64 74 |.38.Top.|184.Widt|
|00002c00| 68 03 31 39 33 06 48 65 | 69 67 68 74 02 31 30 0b |h.193.He|ight.10.|
|00002c10| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 13 44 69 73 |BalloonH|elp..Dis|
|00002c20| 61 62 6c 65 64 42 61 6c | 6c 6f 6f 6e 48 65 6c 70 |abledBal|loonHelp|
|00002c30| 00 08 4c 6f 63 6b 4c 65 | 66 74 05 46 61 6c 73 65 |..LockLe|ft.False|
|00002c40| 07 4c 6f 63 6b 54 6f 70 | 05 46 61 6c 73 65 09 4c |.LockTop|.False.L|
|00002c50| 6f 63 6b 52 69 67 68 74 | 05 46 61 6c 73 65 0a 4c |ockRight|.False.L|
|00002c60| 6f 63 6b 42 6f 74 74 6f | 6d 05 46 61 6c 73 65 08 |ockBotto|m.False.|
|00002c70| 42 61 63 6b 64 72 6f 70 | 02 31 33 07 45 6e 61 62 |Backdrop|.13.Enab|
|00002c80| 6c 65 64 04 54 72 75 65 | 02 00 05 41 04 56 69 65 |led.True|...A.Vie|
|00002c90| 77 07 50 72 65 66 57 69 | 6e 04 9c 01 95 04 12 04 |w.PrefWi|n.......|
|00002ca0| 4e 61 6d 65 07 50 72 65 | 66 57 69 6e 05 46 72 61 |Name.Pre|fWin.Fra|
|00002cb0| 6d 65 01 31 0c 48 61 73 | 42 61 63 6b 43 6f 6c 6f |me.1.Has|BackColo|
|00002cc0| 72 05 46 61 6c 73 65 09 | 42 61 63 6b 43 6f 6c 6f |r.False.|BackColo|
|00002cd0| 72 08 31 36 37 37 37 32 | 31 35 08 42 61 63 6b 64 |r.167772|15.Backd|
|00002ce0| 72 6f 70 01 30 05 54 69 | 74 6c 65 0b 50 72 65 66 |rop.0.Ti|tle.Pref|
|00002cf0| 65 72 65 6e 63 65 73 07 | 56 69 73 69 62 6c 65 04 |erences.|Visible.|
|00002d00| 54 72 75 65 08 43 6c 6f | 73 65 42 6f 78 04 54 72 |True.Clo|seBox.Tr|
|00002d10| 75 65 08 47 72 6f 77 49 | 63 6f 6e 05 46 61 6c 73 |ue.GrowI|con.Fals|
|00002d20| 65 08 5a 6f 6f 6d 49 63 | 6f 6e 05 46 61 6c 73 65 |e.ZoomIc|on.False|
|00002d30| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 09 50 6c |.Balloon|Help..Pl|
|00002d40| 61 63 65 6d 65 6e 74 01 | 30 05 57 69 64 74 68 03 |acement.|0.Width.|
|00002d50| 33 32 35 06 48 65 69 67 | 68 74 03 31 31 36 08 4d |325.Heig|ht.116.M|
|00002d60| 69 6e 57 69 64 74 68 02 | 36 34 09 4d 69 6e 48 65 |inWidth.|64.MinHe|
|00002d70| 69 67 68 74 02 36 34 08 | 4d 61 78 57 69 64 74 68 |ight.64.|MaxWidth|
|00002d80| 05 33 32 30 30 30 09 4d | 61 78 48 65 69 67 68 74 |.32000.M|axHeight|
|00002d90| 05 33 32 30 30 30 07 00 | 07 50 72 65 66 57 69 6e |.32000..|.PrefWin|
|00002da0| ac 01 06 44 69 61 6c 6f | 67 00 00 03 08 49 6e 69 |...Dialo|g....Ini|
|00002db0| 74 54 65 78 74 00 00 00 | 07 1d 07 1d 09 0e 53 75 |tText...|......Su|
|00002dc0| 62 20 49 6e 69 74 54 65 | 78 74 28 29 31 2f 2f 20 |b InitTe|xt()1// |
|00002dd0| 49 6e 69 74 73 20 61 6e | 64 20 64 69 73 70 6c 61 |Inits an|d displa|
|00002de0| 79 73 20 74 68 65 20 74 | 65 78 74 20 66 6f 72 20 |ys the t|ext for |
|00002df0| 61 6e 79 20 70 72 65 66 | 20 69 74 65 6d 73 18 44 |any pref| items.D|
|00002e00| 69 6d 20 44 69 73 70 4f | 72 64 53 74 72 20 61 73 |im DispO|rdStr as|
|00002e10| 20 53 74 72 69 6e 67 00 | 37 44 69 73 70 4f 72 64 | String.|7DispOrd|
|00002e20| 53 74 72 20 3d 20 22 52 | 61 6e 64 6f 6d 3a 20 67 |Str = "R|andom: g|
|00002e30| 65 74 73 20 74 68 65 20 | 74 65 78 74 20 69 6e 20 |ets the |text in |
|00002e40| 61 20 72 61 6e 64 6f 6d | 20 6f 72 64 65 72 2e 22 |a random| order."|
|00002e50| 89 01 44 69 73 70 4f 72 | 64 53 74 72 20 3d 20 44 |..DispOr|dStr = D|
|00002e60| 69 73 70 4f 72 64 53 74 | 72 20 2b 20 22 20 53 65 |ispOrdSt|r + " Se|
|00002e70| 71 75 65 6e 74 69 61 6c | 3a 20 64 69 73 70 6c 61 |quential|: displa|
|00002e80| 79 73 20 74 68 65 20 74 | 65 78 74 20 66 69 72 73 |ys the t|ext firs|
|00002e90| 74 20 74 6f 20 6c 61 73 | 74 2e 22 00 1d 44 69 73 |t to las|t."..Dis|
|00002ea0| 70 4f 72 64 54 65 78 74 | 2e 54 65 78 74 20 3d 20 |pOrdText|.Text = |
|00002eb0| 44 69 73 70 4f 72 64 53 | 74 72 07 45 6e 64 20 53 |DispOrdS|tr.End S|
|00002ec0| 75 62 09 49 6e 69 74 50 | 72 65 66 73 00 00 00 0a |ub.InitP|refs....|
|00002ed0| 04 0a 04 0d 0f 53 75 62 | 20 49 6e 69 74 50 72 65 |.....Sub| InitPre|
|00002ee0| 66 73 28 29 91 01 2f 2f | 20 52 65 61 64 73 20 74 |fs()..//| Reads t|
|00002ef0| 68 65 20 61 70 70 27 73 | 20 70 72 65 66 20 70 72 |he app's| pref pr|
|00002f00| 6f 70 65 72 74 69 65 73 | 20 61 6e 64 20 73 65 74 |operties| and set|
|00002f10| 73 20 74 68 65 20 70 72 | 65 66 20 64 69 61 6c 6f |s the pr|ef dialo|
|00002f20| 67 20 69 6e 74 65 72 66 | 61 63 65 20 61 63 63 6f |g interf|ace acco|
|00002f30| 72 64 69 6e 67 6c 79 00 | 89 01 2f 2f 20 44 65 70 |rdingly.|..// Dep|
|00002f40| 65 6e 64 69 6e 67 20 6f | 6e 20 74 68 65 20 70 72 |ending o|n the pr|
|00002f50| 65 66 20 76 61 6c 75 65 | 2c 20 74 75 72 6e 73 20 |ef value|, turns |
|00002f60| 74 68 65 20 61 70 70 72 | 6f 70 72 69 61 74 65 20 |the appr|opriate |
|00002f70| 72 61 64 69 6f 20 62 74 | 6e 20 6f 6e 20 6f 72 20 |radio bt|n on or |
|00002f80| 6f 66 66 1f 53 65 6c 65 | 63 74 20 43 61 73 65 20 |off.Sele|ct Case |
|00002f90| 41 70 70 2e 66 44 69 73 | 70 6c 61 79 50 61 74 74 |App.fDis|playPatt|
|00002fa0| 65 72 6e 0d 43 61 73 65 | 20 22 52 61 6e 64 6f 6d |ern.Case| "Random|
|00002fb0| 22 14 52 61 6e 64 42 74 | 6e 2e 56 61 6c 75 65 20 |".RandBt|n.Value |
|00002fc0| 3d 20 54 52 55 45 14 53 | 65 71 42 74 6e 2e 56 61 |= TRUE.S|eqBtn.Va|
|00002fd0| 6c 75 65 20 3d 20 46 41 | 4c 53 45 11 43 61 73 65 |lue = FA|LSE.Case|
|00002fe0| 20 22 53 65 71 75 65 6e | 74 69 61 6c 22 15 52 61 | "Sequen|tial".Ra|
|00002ff0| 6e 64 42 74 6e 2e 56 61 | 6c 75 65 20 3d 20 46 41 |ndBtn.Va|lue = FA|
|00003000| 4c 53 45 13 53 65 71 42 | 74 6e 2e 56 61 6c 75 65 |LSE.SeqB|tn.Value|
|00003010| 20 3d 20 54 52 55 45 0a | 45 6e 64 20 53 65 6c 65 | = TRUE.|End Sele|
|00003020| 63 74 07 45 6e 64 20 53 | 75 62 16 53 74 6f 72 65 |ct.End S|ub.Store|
|00003030| 50 72 65 66 73 49 6e 50 | 72 6f 70 65 72 74 69 65 |PrefsInP|ropertie|
|00003040| 73 00 00 00 09 18 09 18 | 0d 1c 53 75 62 20 53 74 |s.......|..Sub St|
|00003050| 6f 72 65 50 72 65 66 73 | 49 6e 50 72 6f 70 65 72 |orePrefs|InProper|
|00003060| 74 69 65 73 28 29 3e 2f | 2f 20 53 69 6e 63 65 20 |ties()>/|/ Since |
|00003070| 74 68 65 20 4f 4b 20 62 | 75 74 74 6f 6e 20 77 61 |the OK b|utton wa|
|00003080| 73 20 63 6c 69 63 6b 65 | 64 2c 20 63 6f 6d 6d 69 |s clicke|d, commi|
|00003090| 74 20 74 68 65 20 70 72 | 65 66 73 20 74 6f 20 6d |t the pr|efs to m|
|000030a0| 65 6d 6f 72 79 00 1c 2f | 2f 20 51 75 6f 74 65 20 |emory../|/ Quote |
|000030b0| 64 69 73 70 6c 61 79 20 | 6f 72 64 65 72 20 70 72 |display |order pr|
|000030c0| 65 66 73 15 49 66 20 52 | 61 6e 64 42 74 6e 2e 56 |efs.If R|andBtn.V|
|000030d0| 61 6c 75 65 20 54 68 65 | 6e 1e 41 70 70 2e 66 44 |alue The|n.App.fD|
|000030e0| 69 73 70 6c 61 79 50 61 | 74 74 65 72 6e 20 3d 20 |isplayPa|ttern = |
|000030f0| 22 52 61 6e 64 6f 6d 22 | 18 45 6c 73 65 49 66 20 |"Random"|.ElseIf |
|00003100| 53 65 71 42 74 6e 2e 56 | 61 6c 75 65 20 54 68 65 |SeqBtn.V|alue The|
|00003110| 6e 22 41 70 70 2e 66 44 | 69 73 70 6c 61 79 50 61 |n"App.fD|isplayPa|
|00003120| 74 74 65 72 6e 20 3d 20 | 22 53 65 71 75 65 6e 74 |ttern = |"Sequent|
|00003130| 69 61 6c 22 04 45 6c 73 | 65 18 2f 2f 20 50 73 65 |ial".Els|e.// Pse|
|00003140| 75 64 6f 2d 65 72 72 6f | 72 20 63 68 65 63 6b 69 |udo-erro|r checki|
|00003150| 6e 67 24 6d 73 67 42 6f | 78 20 22 41 20 50 72 65 |ng$msgBo|x "A Pre|
|00003160| 66 73 20 65 72 72 6f 72 | 20 68 61 73 20 6f 63 63 |fs error| has occ|
|00003170| 75 72 72 65 64 2e 22 06 | 45 6e 64 20 69 66 07 45 |urred.".|End if.E|
|00003180| 6e 64 20 53 75 62 00 01 | 04 4f 70 65 6e 02 05 02 |nd Sub..|.Open...|
|00003190| 05 04 0a 53 75 62 20 4f | 70 65 6e 28 29 08 49 6e |...Sub O|pen().In|
|000031a0| 69 74 54 65 78 74 09 49 | 6e 69 74 50 72 65 66 73 |itText.I|nitPrefs|
|000031b0| 07 45 6e 64 20 53 75 62 | 00 00 06 07 00 00 b4 01 |.End Sub|........|
|000031c0| 0a 50 75 73 68 42 75 74 | 74 6f 6e 00 00 00 00 01 |.PushBut|ton.....|
|000031d0| 06 41 63 74 69 6f 6e 13 | 0d 13 0d 15 0c 53 75 62 |.Action.|.....Sub|
|000031e0| 20 41 63 74 69 6f 6e 28 | 29 18 44 69 6d 20 74 68 | Action(|).Dim th|
|000031f0| 65 52 65 73 75 6c 74 20 | 61 73 20 42 6f 6f 6c 65 |eResult |as Boole|
|00003200| 61 6e 00 24 2f 2f 20 53 | 65 74 20 74 68 65 20 61 |an.$// S|et the a|
|00003210| 70 70 6c 69 63 61 74 69 | 6f 6e 27 73 20 70 72 65 |pplicati|on's pre|
|00003220| 66 65 72 65 6e 63 65 73 | 16 53 74 6f 72 65 50 72 |ferences|.StorePr|
|00003230| 65 66 73 49 6e 50 72 6f | 70 65 72 74 69 65 73 00 |efsInPro|perties.|
|00003240| 31 2f 2f 20 54 65 6c 6c | 20 74 68 65 20 61 70 70 |1// Tell| the app|
|00003250| 6c 69 63 61 74 69 6f 6e | 20 74 6f 20 77 72 69 74 |lication| to writ|
|00003260| 65 20 69 74 27 73 20 70 | 72 65 66 65 72 65 6e 63 |e it's p|referenc|
|00003270| 65 73 23 74 68 65 52 65 | 73 75 6c 74 20 3d 20 41 |es#theRe|sult = A|
|00003280| 70 70 2e 50 72 65 66 73 | 43 68 65 63 6b 46 6f 72 |pp.Prefs|CheckFor|
|00003290| 46 69 6c 65 28 29 00 11 | 49 66 20 74 68 65 52 65 |File()..|If theRe|
|000032a0| 73 75 6c 74 20 74 68 65 | 6e 3d 2f 2f 20 41 20 70 |sult the|n=// A p|
|000032b0| 72 65 66 73 20 66 69 6c | 65 20 61 6c 72 65 61 64 |refs fil|e alread|
|000032c0| 79 20 65 78 69 73 74 73 | 20 73 6f 20 73 69 6d 70 |y exists| so simp|
|000032d0| 6c 79 20 77 72 69 74 65 | 20 74 68 65 20 64 61 74 |ly write| the dat|
|000032e0| 61 20 74 6f 20 69 74 0e | 41 70 70 2e 50 72 65 66 |a to it.|App.Pref|
|000032f0| 73 57 72 69 74 65 04 45 | 6c 73 65 2b 2f 2f 20 4e |sWrite.E|lse+// N|
|00003300| 6f 20 70 72 65 66 73 20 | 66 69 6c 65 20 65 78 69 |o prefs |file exi|
|00003310| 73 74 73 20 73 6f 20 63 | 72 65 61 74 65 20 61 20 |sts so c|reate a |
|00003320| 6e 65 77 20 6f 6e 65 0f | 41 70 70 2e 50 72 65 66 |new one.|App.Pref|
|00003330| 73 43 72 65 61 74 65 0e | 41 70 70 2e 50 72 65 66 |sCreate.|App.Pref|
|00003340| 73 57 72 69 74 65 06 45 | 6e 64 20 69 66 00 1e 2f |sWrite.E|nd if../|
|00003350| 2f 43 6c 6f 73 65 20 74 | 68 65 20 70 72 65 66 65 |/Close t|he prefe|
|00003360| 72 65 6e 63 65 73 20 77 | 69 6e 64 6f 77 0d 50 72 |rences w|indow.Pr|
|00003370| 65 66 57 69 6e 2e 43 6c | 6f 73 65 07 45 6e 64 20 |efWin.Cl|ose.End |
|00003380| 53 75 62 00 00 07 00 00 | b4 01 0a 50 75 73 68 42 |Sub.....|...PushB|
|00003390| 75 74 74 6f 6e 00 00 00 | 00 01 06 41 63 74 69 6f |utton...|...Actio|
|000033a0| 6e 02 0d 02 00 04 0c 53 | 75 62 20 41 63 74 69 6f |n......S|ub Actio|
|000033b0| 6e 28 29 3a 2f 2f 20 43 | 6c 6f 73 65 73 20 74 68 |n():// C|loses th|
|000033c0| 68 65 20 70 72 65 66 65 | 72 65 6e 63 65 73 20 77 |he prefe|rences w|
|000033d0| 69 6e 64 6f 77 20 77 69 | 74 68 6f 75 74 20 73 61 |indow wi|thout sa|
|000033e0| 76 69 6e 67 20 74 68 65 | 20 70 72 65 66 73 0d 50 |ving the| prefs.P|
|000033f0| 72 65 66 57 69 6e 2e 43 | 6c 6f 73 65 07 45 6e 64 |refWin.C|lose.End|
|00003400| 20 53 75 62 00 00 07 00 | 00 a8 01 08 47 72 6f 75 | Sub....|....Grou|
|00003410| 70 42 6f 78 00 00 00 00 | 00 00 00 07 00 00 b8 01 |pBox....|........|
|00003420| 0b 52 61 64 69 6f 42 75 | 74 74 6f 6e 00 00 00 00 |.RadioBu|tton....|
|00003430| 01 06 41 63 74 69 6f 6e | 01 00 01 00 03 0c 53 75 |..Action|......Su|
|00003440| 62 20 41 63 74 69 6f 6e | 28 29 00 07 45 6e 64 20 |b Action|()..End |
|00003450| 53 75 62 00 00 07 00 00 | b8 01 0b 52 61 64 69 6f |Sub.....|...Radio|
|00003460| 42 75 74 74 6f 6e 00 00 | 00 00 02 0a 4d 6f 75 73 |Button..|....Mous|
|00003470| 65 45 6e 74 65 72 01 00 | 01 00 03 10 53 75 62 20 |eEnter..|....Sub |
|00003480| 4d 6f 75 73 65 45 6e 74 | 65 72 28 29 00 07 45 6e |MouseEnt|er()..En|
|00003490| 64 20 53 75 62 06 41 63 | 74 69 6f 6e 01 00 01 00 |d Sub.Ac|tion....|
|000034a0| 03 0c 53 75 62 20 41 63 | 74 69 6f 6e 28 29 00 07 |..Sub Ac|tion()..|
|000034b0| 45 6e 64 20 53 75 62 00 | 00 07 00 00 b4 01 0a 53 |End Sub.|.......S|
|000034c0| 74 61 74 69 63 54 65 78 | 74 00 00 00 00 01 09 4d |taticTex|t......M|
|000034d0| 6f 75 73 65 4d 6f 76 65 | 01 00 01 00 03 29 53 75 |ouseMove|.....)Su|
|000034e0| 62 20 4d 6f 75 73 65 4d | 6f 76 65 28 58 20 41 73 |b MouseM|ove(X As|
|000034f0| 20 49 6e 74 65 67 65 72 | 2c 20 59 20 41 73 20 49 | Integer|, Y As I|
|00003500| 6e 74 65 67 65 72 29 00 | 07 45 6e 64 20 53 75 62 |nteger).|.End Sub|
|00003510| 00 00 06 0a 50 75 73 68 | 42 75 74 74 6f 6e 17 04 |....Push|Button..|
|00003520| 4e 61 6d 65 05 4f 6b 42 | 74 6e 05 49 6e 64 65 78 |Name.OkB|tn.Index|
|00003530| 0b 2d 32 31 34 37 34 38 | 33 36 34 38 0d 54 61 62 |.-214748|3648.Tab|
|00003540| 50 61 6e 65 6c 49 6e 64 | 65 78 01 30 07 56 69 73 |PanelInd|ex.0.Vis|
|00003550| 69 62 6c 65 04 54 72 75 | 65 04 4c 65 66 74 03 32 |ible.Tru|e.Left.2|
|00003560| 35 32 03 54 6f 70 02 38 | 36 05 57 69 64 74 68 02 |52.Top.8|6.Width.|
|00003570| 36 30 06 48 65 69 67 68 | 74 02 32 30 0b 42 61 6c |60.Heigh|t.20.Bal|
|00003580| 6c 6f 6f 6e 48 65 6c 70 | 00 13 44 69 73 61 62 6c |loonHelp|..Disabl|
|00003590| 65 64 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 08 4c |edBalloo|nHelp..L|
|000035a0| 6f 63 6b 4c 65 66 74 05 | 46 61 6c 73 65 07 4c 6f |ockLeft.|False.Lo|
|000035b0| 63 6b 54 6f 70 05 46 61 | 6c 73 65 09 4c 6f 63 6b |ckTop.Fa|lse.Lock|
|000035c0| 52 69 67 68 74 05 46 61 | 6c 73 65 0a 4c 6f 63 6b |Right.Fa|lse.Lock|
|000035d0| 42 6f 74 74 6f 6d 05 46 | 61 6c 73 65 08 54 65 78 |Bottom.F|alse.Tex|
|000035e0| 74 46 6f 6e 74 06 53 79 | 73 74 65 6d 08 54 65 78 |tFont.Sy|stem.Tex|
|000035f0| 74 53 69 7a 65 02 31 32 | 04 42 6f 6c 64 05 46 61 |tSize.12|.Bold.Fa|
|00003600| 6c 73 65 06 49 74 61 6c | 69 63 05 46 61 6c 73 65 |lse.Ital|ic.False|
|00003610| 09 55 6e 64 65 72 6c 69 | 6e 65 05 46 61 6c 73 65 |.Underli|ne.False|
|00003620| 07 43 61 70 74 69 6f 6e | 02 4f 6b 07 44 65 66 61 |.Caption|.Ok.Defa|
|00003630| 75 6c 74 04 54 72 75 65 | 06 43 61 6e 63 65 6c 05 |ult.True|.Cancel.|
|00003640| 46 61 6c 73 65 07 45 6e | 61 62 6c 65 64 04 54 72 |False.En|abled.Tr|
|00003650| 75 65 00 0a 50 75 73 68 | 42 75 74 74 6f 6e 17 04 |ue..Push|Button..|
|00003660| 4e 61 6d 65 09 43 61 6e | 63 65 6c 42 74 6e 05 49 |Name.Can|celBtn.I|
|00003670| 6e 64 65 78 0b 2d 32 31 | 34 37 34 38 33 36 34 38 |ndex.-21|47483648|
|00003680| 0d 54 61 62 50 61 6e 65 | 6c 49 6e 64 65 78 01 30 |.TabPane|lIndex.0|
|00003690| 07 56 69 73 69 62 6c 65 | 04 54 72 75 65 04 4c 65 |.Visible|.True.Le|
|000036a0| 66 74 03 31 38 31 03 54 | 6f 70 02 38 36 05 57 69 |ft.181.T|op.86.Wi|
|000036b0| 64 74 68 02 36 30 06 48 | 65 69 67 68 74 02 32 30 |dth.60.H|eight.20|
|000036c0| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 13 44 69 |.Balloon|Help..Di|
|000036d0| 73 61 62 6c 65 64 42 61 | 6c 6c 6f 6f 6e 48 65 6c |sabledBa|lloonHel|
|000036e0| 70 00 08 4c 6f 63 6b 4c | 65 66 74 05 46 61 6c 73 |p..LockL|eft.Fals|
|000036f0| 65 07 4c 6f 63 6b 54 6f | 70 05 46 61 6c 73 65 09 |e.LockTo|p.False.|
|00003700| 4c 6f 63 6b 52 69 67 68 | 74 05 46 61 6c 73 65 0a |LockRigh|t.False.|
|00003710| 4c 6f 63 6b 42 6f 74 74 | 6f 6d 05 46 61 6c 73 65 |LockBott|om.False|
|00003720| 08 54 65 78 74 46 6f 6e | 74 06 53 79 73 74 65 6d |.TextFon|t.System|
|00003730| 08 54 65 78 74 53 69 7a | 65 02 31 32 04 42 6f 6c |.TextSiz|e.12.Bol|
|00003740| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|00003750| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|00003760| 61 6c 73 65 07 43 61 70 | 74 69 6f 6e 06 43 61 6e |alse.Cap|tion.Can|
|00003770| 63 65 6c 07 44 65 66 61 | 75 6c 74 05 46 61 6c 73 |cel.Defa|ult.Fals|
|00003780| 65 06 43 61 6e 63 65 6c | 04 54 72 75 65 07 45 6e |e.Cancel|.True.En|
|00003790| 61 62 6c 65 64 04 54 72 | 75 65 01 08 47 72 6f 75 |abled.Tr|ue..Grou|
|000037a0| 70 42 6f 78 15 04 4e 61 | 6d 65 09 47 72 6f 75 70 |pBox..Na|me.Group|
|000037b0| 42 6f 78 31 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |Box1.Ind|ex.-2147|
|000037c0| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|000037d0| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|000037e0| 72 75 65 04 4c 65 66 74 | 02 31 33 03 54 6f 70 02 |rue.Left|.13.Top.|
|000037f0| 31 33 05 57 69 64 74 68 | 03 32 39 39 06 48 65 69 |13.Width|.299.Hei|
|00003800| 67 68 74 02 36 31 0b 42 | 61 6c 6c 6f 6f 6e 48 65 |ght.61.B|alloonHe|
|00003810| 6c 70 00 13 44 69 73 61 | 62 6c 65 64 42 61 6c 6c |lp..Disa|bledBall|
|00003820| 6f 6f 6e 48 65 6c 70 00 | 08 4c 6f 63 6b 4c 65 66 |oonHelp.|.LockLef|
|00003830| 74 05 46 61 6c 73 65 07 | 4c 6f 63 6b 54 6f 70 05 |t.False.|LockTop.|
|00003840| 46 61 6c 73 65 09 4c 6f | 63 6b 52 69 67 68 74 05 |False.Lo|ckRight.|
|00003850| 46 61 6c 73 65 0a 4c 6f | 63 6b 42 6f 74 74 6f 6d |False.Lo|ckBottom|
|00003860| 05 46 61 6c 73 65 08 54 | 65 78 74 46 6f 6e 74 06 |.False.T|extFont.|
|00003870| 53 79 73 74 65 6d 08 54 | 65 78 74 53 69 7a 65 02 |System.T|extSize.|
|00003880| 31 32 04 42 6f 6c 64 05 | 46 61 6c 73 65 06 49 74 |12.Bold.|False.It|
|00003890| 61 6c 69 63 05 46 61 6c | 73 65 09 55 6e 64 65 72 |alic.Fal|se.Under|
|000038a0| 6c 69 6e 65 05 46 61 6c | 73 65 07 43 61 70 74 69 |line.Fal|se.Capti|
|000038b0| 6f 6e 13 51 75 6f 74 65 | 20 64 69 73 70 6c 61 79 |on.Quote| display|
|000038c0| 20 6f 72 64 65 72 07 45 | 6e 61 62 6c 65 64 04 54 | order.E|nabled.T|
|000038d0| 72 75 65 02 0b 52 61 64 | 69 6f 42 75 74 74 6f 6e |rue..Rad|ioButton|
|000038e0| 16 04 4e 61 6d 65 07 52 | 61 6e 64 42 74 6e 05 49 |..Name.R|andBtn.I|
|000038f0| 6e 64 65 78 0b 2d 32 31 | 34 37 34 38 33 36 34 38 |ndex.-21|47483648|
|00003900| 0d 54 61 62 50 61 6e 65 | 6c 49 6e 64 65 78 01 30 |.TabPane|lIndex.0|
|00003910| 07 56 69 73 69 62 6c 65 | 04 54 72 75 65 04 4c 65 |.Visible|.True.Le|
|00003920| 66 74 02 32 33 03 54 6f | 70 02 33 30 05 57 69 64 |ft.23.To|p.30.Wid|
|00003930| 74 68 03 31 30 32 06 48 | 65 69 67 68 74 02 32 30 |th.102.H|eight.20|
|00003940| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 13 44 69 |.Balloon|Help..Di|
|00003950| 73 61 62 6c 65 64 42 61 | 6c 6c 6f 6f 6e 48 65 6c |sabledBa|lloonHel|
|00003960| 70 00 08 4c 6f 63 6b 4c | 65 66 74 05 46 61 6c 73 |p..LockL|eft.Fals|
|00003970| 65 07 4c 6f 63 6b 54 6f | 70 05 46 61 6c 73 65 09 |e.LockTo|p.False.|
|00003980| 4c 6f 63 6b 52 69 67 68 | 74 05 46 61 6c 73 65 0a |LockRigh|t.False.|
|00003990| 4c 6f 63 6b 42 6f 74 74 | 6f 6d 05 46 61 6c 73 65 |LockBott|om.False|
|000039a0| 08 54 65 78 74 46 6f 6e | 74 06 53 79 73 74 65 6d |.TextFon|t.System|
|000039b0| 08 54 65 78 74 53 69 7a | 65 02 31 32 04 42 6f 6c |.TextSiz|e.12.Bol|
|000039c0| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|000039d0| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|000039e0| 61 6c 73 65 07 43 61 70 | 74 69 6f 6e 06 52 61 6e |alse.Cap|tion.Ran|
|000039f0| 64 6f 6d 05 56 61 6c 75 | 65 05 46 61 6c 73 65 07 |dom.Valu|e.False.|
|00003a00| 45 6e 61 62 6c 65 64 04 | 54 72 75 65 03 0b 52 61 |Enabled.|True..Ra|
|00003a10| 64 69 6f 42 75 74 74 6f | 6e 16 04 4e 61 6d 65 06 |dioButto|n..Name.|
|00003a20| 53 65 71 42 74 6e 05 49 | 6e 64 65 78 0b 2d 32 31 |SeqBtn.I|ndex.-21|
|00003a30| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|00003a40| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|00003a50| 04 54 72 75 65 04 4c 65 | 66 74 02 32 33 03 54 6f |.True.Le|ft.23.To|
|00003a60| 70 02 34 39 05 57 69 64 | 74 68 03 31 30 32 06 48 |p.49.Wid|th.102.H|
|00003a70| 65 69 67 68 74 02 32 30 | 0b 42 61 6c 6c 6f 6f 6e |eight.20|.Balloon|
|00003a80| 48 65 6c 70 00 13 44 69 | 73 61 62 6c 65 64 42 61 |Help..Di|sabledBa|
|00003a90| 6c 6c 6f 6f 6e 48 65 6c | 70 00 08 4c 6f 63 6b 4c |lloonHel|p..LockL|
|00003aa0| 65 66 74 05 46 61 6c 73 | 65 07 4c 6f 63 6b 54 6f |eft.Fals|e.LockTo|
|00003ab0| 70 05 46 61 6c 73 65 09 | 4c 6f 63 6b 52 69 67 68 |p.False.|LockRigh|
|00003ac0| 74 05 46 61 6c 73 65 0a | 4c 6f 63 6b 42 6f 74 74 |t.False.|LockBott|
|00003ad0| 6f 6d 05 46 61 6c 73 65 | 08 54 65 78 74 46 6f 6e |om.False|.TextFon|
|00003ae0| 74 06 53 79 73 74 65 6d | 08 54 65 78 74 53 69 7a |t.System|.TextSiz|
|00003af0| 65 02 31 32 04 42 6f 6c | 64 05 46 61 6c 73 65 06 |e.12.Bol|d.False.|
|00003b00| 49 74 61 6c 69 63 05 46 | 61 6c 73 65 09 55 6e 64 |Italic.F|alse.Und|
|00003b10| 65 72 6c 69 6e 65 05 46 | 61 6c 73 65 07 43 61 70 |erline.F|alse.Cap|
|00003b20| 74 69 6f 6e 0a 53 65 71 | 75 65 6e 74 69 61 6c 05 |tion.Seq|uential.|
|00003b30| 56 61 6c 75 65 05 46 61 | 6c 73 65 07 45 6e 61 62 |Value.Fa|lse.Enab|
|00003b40| 6c 65 64 04 54 72 75 65 | 04 0a 53 74 61 74 69 63 |led.True|..Static|
|00003b50| 54 65 78 74 17 04 4e 61 | 6d 65 0b 44 69 73 70 4f |Text..Na|me.DispO|
|00003b60| 72 64 54 65 78 74 05 49 | 6e 64 65 78 0b 2d 32 31 |rdText.I|ndex.-21|
|00003b70| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|00003b80| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|00003b90| 04 54 72 75 65 04 4c 65 | 66 74 03 31 35 36 03 54 |.True.Le|ft.156.T|
|00003ba0| 6f 70 02 32 37 05 57 69 | 64 74 68 03 31 35 31 06 |op.27.Wi|dth.151.|
|00003bb0| 48 65 69 67 68 74 02 34 | 30 0b 42 61 6c 6c 6f 6f |Height.4|0.Balloo|
|00003bc0| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|00003bd0| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00003be0| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|00003bf0| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|00003c00| 68 74 05 46 61 6c 73 65 | 0a 4c 6f 63 6b 42 6f 74 |ht.False|.LockBot|
|00003c10| 74 6f 6d 05 46 61 6c 73 | 65 08 54 65 78 74 46 6f |tom.Fals|e.TextFo|
|00003c20| 6e 74 06 4d 6f 6e 61 63 | 6f 08 54 65 78 74 53 69 |nt.Monac|o.TextSi|
|00003c30| 7a 65 01 39 04 42 6f 6c | 64 05 46 61 6c 73 65 06 |ze.9.Bol|d.False.|
|00003c40| 49 74 61 6c 69 63 05 46 | 61 6c 73 65 09 55 6e 64 |Italic.F|alse.Und|
|00003c50| 65 72 6c 69 6e 65 05 46 | 61 6c 73 65 04 54 65 78 |erline.F|alse.Tex|
|00003c60| 74 06 4c 61 62 65 6c 3a | 09 54 65 78 74 41 6c 69 |t.Label:|.TextAli|
|00003c70| 67 6e 01 30 09 54 65 78 | 74 43 6f 6c 6f 72 01 30 |gn.0.Tex|tColor.0|
|00003c80| 09 4d 75 6c 74 69 4c 69 | 6e 65 04 54 72 75 65 05 |.MultiLi|ne.True.|
|00003c90| 00 06 41 05 43 6c 61 73 | 73 10 4e 6f 43 6c 65 61 |..A.Clas|s.NoClea|
|00003ca0| 72 43 6f 70 79 50 61 73 | 74 65 8c 01 8c 03 a9 0b |rCopyPas|te......|
|00003cb0| ba 07 07 00 10 4e 6f 43 | 6c 65 61 72 43 6f 70 79 |.....NoC|learCopy|
|00003cc0| 50 61 73 74 65 88 02 09 | 45 64 69 74 46 69 65 6c |Paste...|EditFiel|
|00003cd0| 64 00 00 00 00 01 0f 45 | 6e 61 62 6c 65 4d 65 6e |d......E|nableMen|
|00003ce0| 75 49 74 65 6d 73 05 19 | 05 19 07 15 53 75 62 20 |uItems..|....Sub |
|00003cf0| 45 6e 61 62 6c 65 4d 65 | 6e 75 49 74 65 6d 73 28 |EnableMe|nuItems(|
|00003d00| 29 17 45 64 69 74 43 75 | 74 2e 45 6e 61 62 6c 65 |).EditCu|t.Enable|
|00003d10| 64 20 3d 20 46 41 4c 53 | 45 19 45 64 69 74 50 61 |d = FALS|E.EditPa|
|00003d20| 73 74 65 2e 45 6e 61 62 | 6c 65 64 20 3d 20 46 41 |ste.Enab|led = FA|
|00003d30| 4c 53 45 19 45 64 69 74 | 43 6c 65 61 72 2e 45 6e |LSE.Edit|Clear.En|
|00003d40| 61 62 6c 65 64 20 3d 20 | 46 41 4c 53 45 00 1c 2f |abled = |FALSE../|
|00003d50| 2f 20 53 65 6c 41 6c 6c | 4d 65 6e 75 2e 45 6e 61 |/ SelAll|Menu.Ena|
|00003d60| 62 6c 65 64 20 3d 20 54 | 52 55 45 07 45 6e 64 20 |bled = T|RUE.End |
|00003d70| 53 75 62 01 0a 53 65 6c | 41 6c 6c 4d 65 6e 75 02 |Sub..Sel|AllMenu.|
|00003d80| 0c 02 0c 05 1a 46 75 6e | 63 74 69 6f 6e 20 41 63 |.....Fun|ction Ac|
|00003d90| 74 69 6f 6e 20 41 73 20 | 42 6f 6f 6c 65 61 6e 2a |tion As |Boolean*|
|00003da0| 2f 2f 20 53 65 6c 65 63 | 74 73 20 61 6c 6c 20 74 |// Selec|ts all t|
|00003db0| 68 65 20 74 65 78 74 20 | 69 6e 20 74 68 65 20 71 |he text |in the q|
|00003dc0| 75 6f 74 65 20 66 69 65 | 6c 64 24 6d 73 67 42 6f |uote fie|ld$msgBo|
|00003dd0| 78 20 22 53 65 6c 65 63 | 74 73 20 61 6c 6c 20 74 |x "Selec|ts all t|
|00003de0| 65 78 74 2e 2e 2e 73 6f | 6d 65 64 61 79 2e 22 00 |ext...so|meday.".|
|00003df0| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 00 00 07 |.End Fun|ction...|
|00003e00| 41 05 43 6c 61 73 73 0a | 50 72 65 66 73 43 6c 61 |A.Class.|PrefsCla|
|00003e10| 73 73 97 01 2f b7 0c 98 | 08 07 00 0a 50 72 65 66 |ss../...|....Pref|
|00003e20| 73 43 6c 61 73 73 2c 0b | 41 70 70 6c 69 63 61 74 |sClass,.|Applicat|
|00003e30| 69 6f 6e 00 04 19 66 44 | 69 73 70 6c 61 79 50 61 |ion...fD|isplayPa|
|00003e40| 74 74 65 72 6e 20 61 73 | 20 53 74 72 69 6e 67 00 |ttern as| String.|
|00003e50| 13 66 50 72 65 66 4e 61 | 6d 65 20 61 73 20 53 74 |.fPrefNa|me as St|
|00003e60| 72 69 6e 67 00 17 66 43 | 75 72 72 50 72 65 66 4c |ring..fC|urrPrefL|
|00003e70| 69 6e 65 20 61 73 20 53 | 74 72 69 6e 67 00 15 66 |ine as S|tring..f|
|00003e80| 54 78 74 53 72 63 46 69 | 6c 65 20 61 73 20 53 74 |TxtSrcFi|le as St|
|00003e90| 72 69 6e 67 00 06 11 53 | 65 74 44 69 73 70 6c 61 |ring...S|etDispla|
|00003ea0| 79 50 61 74 74 65 72 6e | 00 00 00 03 00 03 00 05 |yPattern|........|
|00003eb0| 17 53 75 62 20 53 65 74 | 44 69 73 70 6c 61 79 50 |.Sub Set|DisplayP|
|00003ec0| 61 74 74 65 72 6e 28 29 | 97 01 2f 2f 20 46 72 6f |attern()|..// Fro|
|00003ed0| 6d 20 74 68 65 20 51 75 | 6f 74 65 20 44 69 73 70 |m the Qu|ote Disp|
|00003ee0| 6c 61 79 20 4f 72 64 65 | 72 20 70 72 65 66 65 72 |lay Orde|r prefer|
|00003ef0| 65 6e 63 65 2e 20 54 68 | 69 73 20 73 65 74 73 20 |ence. Th|is sets |
|00003f00| 74 68 65 20 27 66 44 69 | 73 70 6c 61 79 50 61 74 |the 'fDi|splayPat|
|00003f10| 74 65 72 6e 27 20 70 72 | 6f 70 65 72 74 79 20 74 |tern' pr|operty t|
|00003f20| 6f 20 2f 2f 20 77 68 61 | 74 65 76 65 72 20 74 68 |o // wha|tever th|
|00003f30| 65 20 75 73 65 72 20 68 | 61 73 20 63 68 65 63 6b |e user h|as check|
|00003f40| 65 64 00 07 45 6e 64 20 | 53 75 62 0a 50 72 65 66 |ed..End |Sub.Pref|
|00003f50| 73 57 72 69 74 65 00 00 | 00 19 21 19 21 1e 10 53 |sWrite..|..!.!..S|
|00003f60| 75 62 20 50 72 65 66 73 | 57 72 69 74 65 28 29 2b |ub Prefs|Write()+|
|00003f70| 2f 2f 20 57 72 69 74 65 | 73 20 74 68 65 20 70 72 |// Write|s the pr|
|00003f80| 65 66 65 72 65 6e 63 65 | 73 20 74 6f 20 74 68 65 |eference|s to the|
|00003f90| 20 70 72 65 66 73 20 66 | 69 6c 65 1c 44 69 6d 20 | prefs f|ile.Dim |
|00003fa0| 70 72 65 66 46 6f 6c 64 | 65 72 20 61 73 20 66 6f |prefFold|er as fo|
|00003fb0| 6c 64 65 72 49 74 65 6d | 1a 44 69 6d 20 70 72 65 |lderItem|.Dim pre|
|00003fc0| 66 46 69 6c 65 50 61 74 | 68 20 61 73 20 53 74 72 |fFilePat|h as Str|
|00003fd0| 69 6e 67 1a 44 69 6d 20 | 70 72 65 66 46 69 6c 65 |ing.Dim |prefFile|
|00003fe0| 20 61 73 20 66 6f 6c 64 | 65 72 49 74 65 6d 26 44 | as fold|erItem&D|
|00003ff0| 69 6d 20 70 72 65 66 46 | 69 6c 65 53 74 72 65 61 |im prefF|ileStrea|
|00004000| 6d 20 61 73 20 54 65 78 | 74 4f 75 74 70 75 74 53 |m as Tex|tOutputS|
|00004010| 74 72 65 61 6d 00 10 44 | 69 6d 20 69 20 61 73 20 |tream..D|im i as |
|00004020| 49 6e 74 65 67 65 72 00 | 1e 70 72 65 66 46 6f 6c |Integer.|.prefFol|
|00004030| 64 65 72 20 3d 20 50 72 | 65 66 65 72 65 6e 63 65 |der = Pr|eference|
|00004040| 73 46 6f 6c 64 65 72 36 | 70 72 65 66 46 69 6c 65 |sFolder6|prefFile|
|00004050| 50 61 74 68 20 3d 20 70 | 72 65 66 46 6f 6c 64 65 |Path = p|refFolde|
|00004060| 72 2e 41 62 73 6f 6c 75 | 74 65 50 61 74 68 20 2b |r.Absolu|tePath +|
|00004070| 20 41 70 70 2e 66 50 72 | 65 66 4e 61 6d 65 00 28 | App.fPr|efName.(|
|00004080| 70 72 65 66 46 69 6c 65 | 20 3d 20 67 65 74 46 6f |prefFile| = getFo|
|00004090| 6c 64 65 72 49 74 65 6d | 28 20 70 72 65 66 46 69 |lderItem|( prefFi|
|000040a0| 6c 65 50 61 74 68 20 29 | 00 28 2f 2f 20 49 66 20 |lePath )|.(// If |
|000040b0| 74 68 65 20 66 69 6c 65 | 20 61 6c 72 65 61 64 79 |the file| already|
|000040c0| 20 65 78 69 73 74 73 2c | 20 64 65 6c 65 74 65 20 | exists,| delete |
|000040d0| 69 74 0f 70 72 65 66 46 | 69 6c 65 2e 44 65 6c 65 |it.prefF|ile.Dele|
|000040e0| 74 65 00 1e 2f 2f 20 53 | 65 74 20 74 68 65 20 66 |te..// S|et the f|
|000040f0| 69 6c 65 20 75 70 20 66 | 6f 72 20 77 72 69 74 69 |ile up f|or writi|
|00004100| 6e 67 2a 70 72 65 66 46 | 69 6c 65 53 74 72 65 61 |ng*prefF|ileStrea|
|00004110| 6d 20 3d 20 70 72 65 66 | 46 69 6c 65 2e 41 70 70 |m = pref|File.App|
|00004120| 65 6e 64 54 6f 54 65 78 | 74 46 69 6c 65 00 2a 2f |endToTex|tFile.*/|
|00004130| 2f 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 57 52 49 |/ ------|---- WRI|
|00004140| 54 45 20 50 52 45 46 20 | 56 41 4c 55 45 53 20 2d |TE PREF |VALUES -|
|00004150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 00 20 2f 2f 20 57 72 |--------|-. // Wr|
|00004160| 69 74 65 20 74 68 65 20 | 44 69 73 70 6c 61 79 50 |ite the |DisplayP|
|00004170| 61 74 74 65 72 6e 20 70 | 72 65 66 2c 70 72 65 66 |attern p|ref,pref|
|00004180| 46 69 6c 65 53 74 72 65 | 61 6d 2e 77 72 69 74 65 |FileStre|am.write|
|00004190| 4c 69 6e 65 20 41 70 70 | 2e 66 44 69 73 70 6c 61 |Line App|.fDispla|
|000041a0| 79 50 61 74 74 65 72 6e | 23 2f 2f 20 57 72 69 74 |yPattern|#// Writ|
|000041b0| 65 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 74 65 |e the cu|rrent te|
|000041c0| 78 74 20 6c 69 6e 65 20 | 70 72 65 66 2a 70 72 65 |xt line |pref*pre|
|000041d0| 66 46 69 6c 65 53 74 72 | 65 61 6d 2e 77 72 69 74 |fFileStr|eam.writ|
|000041e0| 65 4c 69 6e 65 20 41 70 | 70 2e 66 43 75 72 72 50 |eLine Ap|p.fCurrP|
|000041f0| 72 65 66 4c 69 6e 65 00 | 11 2f 2f 20 43 6c 6f 73 |refLine.|.// Clos|
|00004200| 65 20 74 68 65 20 66 69 | 6c 65 14 70 72 65 66 46 |e the fi|le.prefF|
|00004210| 69 6c 65 53 74 72 65 61 | 6d 2e 43 6c 6f 73 65 07 |ileStrea|m.Close.|
|00004220| 45 6e 64 20 53 75 62 09 | 50 72 65 66 73 52 65 61 |End Sub.|PrefsRea|
|00004230| 64 00 00 00 1b 36 1b 36 | 1d 0f 53 75 62 20 50 72 |d....6.6|..Sub Pr|
|00004240| 65 66 73 52 65 61 64 28 | 29 8e 01 2f 2f 20 4c 6f |efsRead(|)..// Lo|
|00004250| 6f 6b 73 20 66 6f 72 20 | 61 20 70 72 65 66 73 20 |oks for |a prefs |
|00004260| 66 69 6c 65 20 69 6e 20 | 74 68 65 72 20 75 73 65 |file in |ther use|
|00004270| 72 27 73 20 50 72 65 66 | 65 72 65 6e 63 65 73 20 |r's Pref|erences |
|00004280| 66 6f 6c 64 65 72 2e 20 | 49 66 20 69 74 20 63 61 |folder. |If it ca|
|00004290| 6e 27 74 20 66 69 6e 64 | 20 1c 2f 2f 20 6f 6e 65 |n't find| .// one|
|000042a0| 2c 20 69 74 20 63 72 65 | 61 74 65 73 20 61 20 6e |, it cre|ates a n|
|000042b0| 65 77 20 6f 6e 65 20 44 | 69 6d 20 70 72 65 66 46 |ew one D|im prefF|
|000042c0| 6f 6c 64 65 72 50 61 74 | 68 20 61 73 20 66 6f 6c |olderPat|h as fol|
|000042d0| 64 65 72 49 74 65 6d 1a | 44 69 6d 20 70 72 65 66 |derItem.|Dim pref|
|000042e0| 50 61 74 68 20 61 73 20 | 66 6f 6c 64 65 72 49 74 |Path as |folderIt|
|000042f0| 65 6d 1f 44 69 6d 20 70 | 72 65 66 46 69 6c 65 20 |em.Dim p|refFile |
|00004300| 61 73 20 54 65 78 74 49 | 6e 70 75 74 53 74 72 65 |as TextI|nputStre|
|00004310| 61 6d 00 16 44 69 6d 20 | 70 72 65 66 54 65 78 74 |am..Dim |prefText|
|00004320| 20 61 73 20 53 74 72 69 | 6e 67 00 22 70 72 65 66 | as Stri|ng."pref|
|00004330| 46 6f 6c 64 65 72 50 61 | 74 68 20 3d 20 50 72 65 |FolderPa|th = Pre|
|00004340| 66 65 72 65 6e 63 65 73 | 46 6f 6c 64 65 72 00 20 |ferences|Folder. |
|00004350| 2f 2f 20 52 65 61 64 20 | 74 68 65 20 66 69 6c 65 |// Read |the file|
|00004360| 20 61 73 20 61 20 66 6f | 6c 64 65 72 49 74 65 6d | as a fo|lderItem|
|00004370| 87 01 70 72 65 66 50 61 | 74 68 20 3d 20 67 65 74 |..prefPa|th = get|
|00004380| 46 6f 6c 64 65 72 49 74 | 65 6d 28 20 70 72 65 66 |FolderIt|em( pref|
|00004390| 46 6f 6c 64 65 72 50 61 | 74 68 2e 41 62 73 6f 6c |FolderPa|th.Absol|
|000043a0| 75 74 65 50 61 74 68 20 | 2b 20 41 70 70 2e 66 50 |utePath |+ App.fP|
|000043b0| 72 65 66 4e 61 6d 65 20 | 29 22 70 72 65 66 46 69 |refName |)"prefFi|
|000043c0| 6c 65 20 3d 20 70 72 65 | 66 50 61 74 68 2e 4f 70 |le = pre|fPath.Op|
|000043d0| 65 6e 41 73 54 65 78 74 | 46 69 6c 65 00 26 2f 2f |enAsText|File.&//|
|000043e0| 20 52 65 61 64 20 74 68 | 61 74 20 66 69 6c 65 20 | Read th|at file |
|000043f0| 74 6f 20 74 68 65 20 4c | 69 62 72 61 72 79 20 66 |to the L|ibrary f|
|00004400| 69 65 6c 64 02 44 6f 33 | 70 72 65 66 54 65 78 74 |ield.Do3|prefText|
|00004410| 20 3d 20 70 72 65 66 54 | 65 78 74 20 2b 20 70 72 | = prefT|ext + pr|
|00004420| 65 66 46 69 6c 65 2e 52 | 65 61 64 4c 69 6e 65 20 |efFile.R|eadLine |
|00004430| 2b 20 43 68 72 28 20 31 | 33 20 29 17 4c 6f 6f 70 |+ Chr( 1|3 ).Loop|
|00004440| 20 55 6e 74 69 6c 20 70 | 72 65 66 46 69 6c 65 2e | Until p|refFile.|
|00004450| 45 4f 46 00 14 2f 2f 20 | 43 6c 6f 73 65 20 75 70 |EOF..// |Close up|
|00004460| 20 74 68 65 20 66 69 6c | 65 0e 70 72 65 66 46 69 | the fil|e.prefFi|
|00004470| 6c 65 2e 43 6c 6f 73 65 | 00 35 2f 2f 20 2d 2d 2d |le.Close|.5// ---|
|00004480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000044a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 00 |--------|-------.|
|000044b0| 38 2f 2f 20 4e 6f 77 20 | 73 74 6f 72 65 20 74 68 |8// Now |store th|
|000044c0| 65 20 72 65 61 64 20 64 | 61 74 61 20 69 6e 20 74 |e read d|ata in t|
|000044d0| 68 65 20 61 70 70 72 6f | 70 72 69 61 74 65 20 70 |he appro|priate p|
|000044e0| 72 6f 70 65 72 74 69 65 | 73 38 41 70 70 2e 66 44 |ropertie|s8App.fD|
|000044f0| 69 73 70 6c 61 79 50 61 | 74 74 65 72 6e 20 3d 20 |isplayPa|ttern = |
|00004500| 4e 74 68 46 69 65 6c 64 | 28 20 70 72 65 66 54 65 |NthField|( prefTe|
|00004510| 78 74 2c 20 43 68 72 28 | 20 31 33 20 29 2c 20 31 |xt, Chr(| 13 ), 1|
|00004520| 20 29 36 41 70 70 2e 66 | 43 75 72 72 50 72 65 66 | )6App.f|CurrPref|
|00004530| 4c 69 6e 65 20 3d 20 4e | 74 68 46 69 65 6c 64 28 |Line = N|thField(|
|00004540| 20 70 72 65 66 54 65 78 | 74 2c 20 43 68 72 28 20 | prefTex|t, Chr( |
|00004550| 31 33 20 29 2c 20 32 20 | 29 07 45 6e 64 20 53 75 |13 ), 2 |).End Su|
|00004560| 62 0b 50 72 65 66 73 43 | 72 65 61 74 65 00 00 00 |b.PrefsC|reate...|
|00004570| 05 33 05 33 0c 11 53 75 | 62 20 50 72 65 66 73 43 |.3.3..Su|b PrefsC|
|00004580| 72 65 61 74 65 28 29 1d | 2f 2f 20 43 72 65 61 74 |reate().|// Creat|
|00004590| 65 73 20 61 20 70 72 65 | 66 65 72 65 6e 63 65 73 |es a pre|ferences|
|000045a0| 20 66 69 6c 65 17 44 69 | 6d 20 70 72 65 66 73 50 | file.Di|m prefsP|
|000045b0| 61 74 68 20 61 73 20 53 | 74 72 69 6e 67 1a 44 69 |ath as S|tring.Di|
|000045c0| 6d 20 70 72 65 66 46 69 | 6c 65 20 61 73 20 66 6f |m prefFi|le as fo|
|000045d0| 6c 64 65 72 49 74 65 6d | 21 44 69 6d 20 74 68 65 |lderItem|!Dim the|
|000045e0| 52 65 73 75 6c 74 20 61 | 73 20 54 65 78 74 4f 75 |Result a|s TextOu|
|000045f0| 74 70 75 74 53 74 72 65 | 61 6d 00 3a 70 72 65 66 |tputStre|am.:pref|
|00004600| 73 50 61 74 68 20 3d 20 | 50 72 65 66 65 72 65 6e |sPath = |Preferen|
|00004610| 63 65 73 46 6f 6c 64 65 | 72 2e 41 62 73 6f 6c 75 |cesFolde|r.Absolu|
|00004620| 74 65 50 61 74 68 20 2b | 20 41 70 70 2e 66 50 72 |tePath +| App.fPr|
|00004630| 65 66 4e 61 6d 65 00 25 | 70 72 65 66 46 69 6c 65 |efName.%|prefFile|
|00004640| 20 3d 20 47 65 74 46 6f | 6c 64 65 72 49 74 65 6d | = GetFo|lderItem|
|00004650| 28 20 70 72 65 66 73 50 | 61 74 68 20 29 00 23 74 |( prefsP|ath ).#t|
|00004660| 68 65 52 65 73 75 6c 74 | 20 3d 20 70 72 65 66 46 |heResult| = prefF|
|00004670| 69 6c 65 2e 43 72 65 61 | 74 65 54 65 78 74 46 69 |ile.Crea|teTextFi|
|00004680| 6c 65 07 45 6e 64 20 53 | 75 62 11 50 72 65 66 73 |le.End S|ub.Prefs|
|00004690| 43 68 65 63 6b 46 6f 72 | 46 69 6c 65 00 07 42 6f |CheckFor|File..Bo|
|000046a0| 6f 6c 65 61 6e 00 13 06 | 13 06 15 27 46 75 6e 63 |olean...|...'Func|
|000046b0| 74 69 6f 6e 20 50 72 65 | 66 73 43 68 65 63 6b 46 |tion Pre|fsCheckF|
|000046c0| 6f 72 46 69 6c 65 28 29 | 20 41 73 20 42 6f 6f 6c |orFile()| As Bool|
|000046d0| 65 61 6e 95 01 2f 2f 20 | 43 68 65 63 6b 73 20 74 |ean..// |Checks t|
|000046e0| 6f 20 73 65 65 20 69 66 | 20 61 20 50 72 65 66 65 |o see if| a Prefe|
|000046f0| 72 65 6e 63 65 73 20 66 | 69 6c 65 20 65 78 69 73 |rences f|ile exis|
|00004700| 74 73 2c 20 75 73 69 6e | 67 20 27 66 50 72 65 66 |ts, usin|g 'fPref|
|00004710| 46 69 6c 65 4e 61 6d 65 | 27 20 61 73 20 74 68 65 |FileName|' as the|
|00004720| 20 66 69 6c 65 20 6e 61 | 6d 65 18 44 69 6d 20 74 | file na|me.Dim t|
|00004730| 68 65 52 65 73 75 6c 74 | 20 61 73 20 42 6f 6f 6c |heResult| as Bool|
|00004740| 65 61 6e 1c 44 69 6d 20 | 70 72 65 66 46 6f 6c 64 |ean.Dim |prefFold|
|00004750| 65 72 50 61 74 68 20 61 | 73 20 53 74 72 69 6e 67 |erPath a|s String|
|00004760| 1a 44 69 6d 20 70 72 65 | 66 46 69 6c 65 50 61 74 |.Dim pre|fFilePat|
|00004770| 68 20 61 73 20 53 74 72 | 69 6e 67 1a 44 69 6d 20 |h as Str|ing.Dim |
|00004780| 70 72 65 66 46 69 6c 65 | 20 61 73 20 66 6f 6c 64 |prefFile| as fold|
|00004790| 65 72 49 74 65 6d 00 26 | 2f 2f 20 45 73 74 61 62 |erItem.&|// Estab|
|000047a0| 6c 69 73 68 20 74 68 65 | 20 6e 61 6d 65 20 6f 66 |lish the| name of|
|000047b0| 20 74 68 65 20 70 72 65 | 66 20 66 69 6c 65 2f 70 | the pre|f file/p|
|000047c0| 72 65 66 46 6f 6c 64 65 | 72 50 61 74 68 20 3d 20 |refFolde|rPath = |
|000047d0| 50 72 65 66 65 72 65 6e | 63 65 73 46 6f 6c 64 65 |Preferen|cesFolde|
|000047e0| 72 2e 41 62 73 6f 6c 75 | 74 65 50 61 74 68 2d 70 |r.Absolu|tePath-p|
|000047f0| 72 65 66 46 69 6c 65 50 | 61 74 68 20 3d 20 70 72 |refFileP|ath = pr|
|00004800| 65 66 46 6f 6c 64 65 72 | 50 61 74 68 20 2b 20 41 |efFolder|Path + A|
|00004810| 70 70 2e 66 50 72 65 66 | 4e 61 6d 65 00 28 70 72 |pp.fPref|Name.(pr|
|00004820| 65 66 46 69 6c 65 20 3d | 20 47 65 74 46 6f 6c 64 |efFile =| GetFold|
|00004830| 65 72 49 74 65 6d 28 20 | 70 72 65 66 46 69 6c 65 |erItem( |prefFile|
|00004840| 50 61 74 68 20 29 00 1b | 74 68 65 52 65 73 75 6c |Path )..|theResul|
|00004850| 74 20 3d 20 70 72 65 66 | 46 69 6c 65 2e 45 78 69 |t = pref|File.Exi|
|00004860| 73 74 73 00 11 49 66 20 | 74 68 65 52 65 73 75 6c |sts..If |theResul|
|00004870| 74 20 74 68 65 6e 0b 72 | 65 74 75 72 6e 20 54 52 |t then.r|eturn TR|
|00004880| 55 45 04 65 6c 73 65 0c | 72 65 74 75 72 6e 20 46 |UE.else.|return F|
|00004890| 41 4c 53 45 06 45 6e 64 | 20 69 66 0c 45 6e 64 20 |ALSE.End| if.End |
|000048a0| 46 75 6e 63 74 69 6f 6e | 12 50 72 65 66 73 57 72 |Function|.PrefsWr|
|000048b0| 69 74 65 44 65 66 61 75 | 6c 74 73 00 00 00 18 11 |iteDefau|lts.....|
|000048c0| 18 11 1f 18 53 75 62 20 | 50 72 65 66 73 57 72 69 |....Sub |PrefsWri|
|000048d0| 74 65 44 65 66 61 75 6c | 74 73 28 29 98 01 2f 2f |teDefaul|ts()..//|
|000048e0| 20 49 66 20 6e 6f 20 70 | 72 65 66 20 66 69 6c 65 | If no p|ref file|
|000048f0| 20 65 78 69 73 74 73 2c | 20 74 68 65 73 65 20 76 | exists,| these v|
|00004900| 61 6c 75 65 73 20 61 72 | 65 20 77 72 69 74 74 65 |alues ar|e writte|
|00004910| 6e 20 61 73 20 64 65 66 | 61 75 6c 74 73 20 77 68 |n as def|aults wh|
|00004920| 65 6e 20 69 74 20 69 73 | 20 66 69 72 73 74 20 63 |en it is| first c|
|00004930| 72 65 61 74 65 64 2b 2f | 2f 20 57 72 69 74 65 73 |reated+/|/ Writes|
|00004940| 20 74 68 65 20 70 72 65 | 66 65 72 65 6e 63 65 73 | the pre|ferences|
|00004950| 20 74 6f 20 74 68 65 20 | 70 72 65 66 73 20 66 69 | to the |prefs fi|
|00004960| 6c 65 1c 44 69 6d 20 70 | 72 65 66 46 6f 6c 64 65 |le.Dim p|refFolde|
|00004970| 72 20 61 73 20 66 6f 6c | 64 65 72 49 74 65 6d 1a |r as fol|derItem.|
|00004980| 44 69 6d 20 70 72 65 66 | 46 69 6c 65 50 61 74 68 |Dim pref|FilePath|
|00004990| 20 61 73 20 53 74 72 69 | 6e 67 1a 44 69 6d 20 70 | as Stri|ng.Dim p|
|000049a0| 72 65 66 46 69 6c 65 20 | 61 73 20 66 6f 6c 64 65 |refFile |as folde|
|000049b0| 72 49 74 65 6d 26 44 69 | 6d 20 70 72 65 66 46 69 |rItem&Di|m prefFi|
|000049c0| 6c 65 53 74 72 65 61 6d | 20 61 73 20 54 65 78 74 |leStream| as Text|
|000049d0| 4f 75 74 70 75 74 53 74 | 72 65 61 6d 00 10 44 69 |OutputSt|ream..Di|
|000049e0| 6d 20 69 20 61 73 20 49 | 6e 74 65 67 65 72 00 1e |m i as I|nteger..|
|000049f0| 70 72 65 66 46 6f 6c 64 | 65 72 20 3d 20 50 72 65 |prefFold|er = Pre|
|00004a00| 66 65 72 65 6e 63 65 73 | 46 6f 6c 64 65 72 36 70 |ferences|Folder6p|
|00004a10| 72 65 66 46 69 6c 65 50 | 61 74 68 20 3d 20 70 72 |refFileP|ath = pr|
|00004a20| 65 66 46 6f 6c 64 65 72 | 2e 41 62 73 6f 6c 75 74 |efFolder|.Absolut|
|00004a30| 65 50 61 74 68 20 2b 20 | 41 70 70 2e 66 50 72 65 |ePath + |App.fPre|
|00004a40| 66 4e 61 6d 65 00 28 70 | 72 65 66 46 69 6c 65 20 |fName.(p|refFile |
|00004a50| 3d 20 67 65 74 46 6f 6c | 64 65 72 49 74 65 6d 28 |= getFol|derItem(|
|00004a60| 20 70 72 65 66 46 69 6c | 65 50 61 74 68 20 29 00 | prefFil|ePath ).|
|00004a70| 28 2f 2f 20 49 66 20 74 | 68 65 20 66 69 6c 65 20 |(// If t|he file |
|00004a80| 61 6c 72 65 61 64 79 20 | 65 78 69 73 74 73 2c 20 |already |exists, |
|00004a90| 64 65 6c 65 74 65 20 69 | 74 0f 70 72 65 66 46 69 |delete i|t.prefFi|
|00004aa0| 6c 65 2e 44 65 6c 65 74 | 65 00 1e 2f 2f 20 53 65 |le.Delet|e..// Se|
|00004ab0| 74 20 74 68 65 20 66 69 | 6c 65 20 75 70 20 66 6f |t the fi|le up fo|
|00004ac0| 72 20 77 72 69 74 69 6e | 67 2a 70 72 65 66 46 69 |r writin|g*prefFi|
|00004ad0| 6c 65 53 74 72 65 61 6d | 20 3d 20 70 72 65 66 46 |leStream| = prefF|
|00004ae0| 69 6c 65 2e 41 70 70 65 | 6e 64 54 6f 54 65 78 74 |ile.Appe|ndToText|
|00004af0| 46 69 6c 65 00 2a 2f 2f | 20 2d 2d 2d 2d 2d 2d 2d |File.*//| -------|
|00004b00| 2d 2d 2d 20 57 52 49 54 | 45 20 50 52 45 46 20 56 |--- WRIT|E PREF V|
|00004b10| 41 4c 55 45 53 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ALUES --|--------|
|00004b20| 00 20 2f 2f 20 57 72 69 | 74 65 20 74 68 65 20 44 |. // Wri|te the D|
|00004b30| 69 73 70 6c 61 79 50 61 | 74 74 65 72 6e 20 70 72 |isplayPa|ttern pr|
|00004b40| 65 66 21 70 72 65 66 46 | 69 6c 65 53 74 72 65 61 |ef!prefF|ileStrea|
|00004b50| 6d 2e 77 72 69 74 65 4c | 69 6e 65 20 22 52 61 6e |m.writeL|ine "Ran|
|00004b60| 64 6f 6d 22 23 2f 2f 20 | 57 72 69 74 65 20 74 68 |dom"#// |Write th|
|00004b70| 65 20 63 75 72 72 65 6e | 74 20 74 65 78 74 20 6c |e curren|t text l|
|00004b80| 69 6e 65 20 70 72 65 66 | 1c 70 72 65 66 46 69 6c |ine pref|.prefFil|
|00004b90| 65 53 74 72 65 61 6d 2e | 77 72 69 74 65 4c 69 6e |eStream.|writeLin|
|00004ba0| 65 20 22 31 22 00 11 2f | 2f 20 43 6c 6f 73 65 20 |e "1"../|/ Close |
|00004bb0| 74 68 65 20 66 69 6c 65 | 14 70 72 65 66 46 69 6c |the file|.prefFil|
|00004bc0| 65 53 74 72 65 61 6d 2e | 43 6c 6f 73 65 07 45 6e |eStream.|Close.En|
|00004bd0| 64 20 53 75 62 00 02 05 | 43 6c 6f 73 65 01 00 01 |d Sub...|Close...|
|00004be0| 00 03 0b 53 75 62 20 43 | 6c 6f 73 65 28 29 00 07 |...Sub C|lose()..|
|00004bf0| 45 6e 64 20 53 75 62 04 | 4f 70 65 6e 0d 12 0d 12 |End Sub.|Open....|
|00004c00| 11 0a 53 75 62 20 4f 70 | 65 6e 28 29 18 44 69 6d |..Sub Op|en().Dim|
|00004c10| 20 74 68 65 52 65 73 75 | 6c 74 20 61 73 20 42 6f | theResu|lt as Bo|
|00004c20| 6f 6c 65 61 6e 00 83 01 | 2f 2f 20 49 6e 69 74 69 |olean...|// Initi|
|00004c30| 61 6c 69 73 65 20 61 6e | 79 74 68 69 6e 67 20 74 |alise an|ything t|
|00004c40| 68 61 74 20 6e 65 65 64 | 73 20 74 6f 20 62 65 20 |hat need|s to be |
|00004c50| 69 6e 69 74 69 61 6c 69 | 73 65 64 20 66 6f 72 20 |initiali|sed for |
|00004c60| 74 68 65 20 70 72 6f 6a | 65 63 74 21 41 70 70 2e |the proj|ect!App.|
|00004c70| 66 50 72 65 66 4e 61 6d | 65 20 3d 20 22 51 75 6f |fPrefNam|e = "Quo|
|00004c80| 74 65 54 68 69 6e 67 20 | 50 72 65 66 22 1a 41 70 |teThing |Pref".Ap|
|00004c90| 70 2e 66 54 78 74 53 72 | 63 46 69 6c 65 20 3d 20 |p.fTxtSr|cFile = |
|00004ca0| 22 51 75 6f 74 65 73 22 | 00 1f 74 68 65 52 65 73 |"Quotes"|..theRes|
|00004cb0| 75 6c 74 20 3d 20 50 72 | 65 66 73 43 68 65 63 6b |ult = Pr|efsCheck|
|00004cc0| 46 6f 72 46 69 6c 65 28 | 29 00 11 49 66 20 74 68 |ForFile(|)..If th|
|00004cd0| 65 52 65 73 75 6c 74 20 | 74 68 65 6e 09 50 72 65 |eResult |then.Pre|
|00004ce0| 66 73 52 65 61 64 04 45 | 6c 73 65 0b 50 72 65 66 |fsRead.E|lse.Pref|
|00004cf0| 73 43 72 65 61 74 65 12 | 50 72 65 66 73 57 72 69 |sCreate.|PrefsWri|
|00004d00| 74 65 44 65 66 61 75 6c | 74 73 09 50 72 65 66 73 |teDefaul|ts.Prefs|
|00004d10| 52 65 61 64 06 45 6e 64 | 20 69 66 07 45 6e 64 20 |Read.End| if.End |
|00004d20| 53 75 62 00 00 00 08 41 | 04 56 69 65 77 0f 50 72 |Sub....A|.View.Pr|
|00004d30| 6f 67 72 61 6d 6d 65 72 | 73 57 69 6e 64 04 ab 06 |ogrammer|sWind...|
|00004d40| 92 01 12 04 4e 61 6d 65 | 0f 50 72 6f 67 72 61 6d |....Name|.Program|
|00004d50| 6d 65 72 73 57 69 6e 64 | 05 46 72 61 6d 65 01 32 |mersWind|.Frame.2|
|00004d60| 0c 48 61 73 42 61 63 6b | 43 6f 6c 6f 72 05 46 61 |.HasBack|Color.Fa|
|00004d70| 6c 73 65 09 42 61 63 6b | 43 6f 6c 6f 72 08 31 36 |lse.Back|Color.16|
|00004d80| 37 37 37 32 31 35 08 42 | 61 63 6b 64 72 6f 70 01 |777215.B|ackdrop.|
|00004d90| 30 05 54 69 74 6c 65 0e | 42 6f 78 20 27 6f 20 47 |0.Title.|Box 'o G|
|00004da0| 6f 6f 64 69 65 73 07 56 | 69 73 69 62 6c 65 04 54 |oodies.V|isible.T|
|00004db0| 72 75 65 08 43 6c 6f 73 | 65 42 6f 78 04 54 72 75 |rue.Clos|eBox.Tru|
|00004dc0| 65 08 47 72 6f 77 49 63 | 6f 6e 04 54 72 75 65 08 |e.GrowIc|on.True.|
|00004dd0| 5a 6f 6f 6d 49 63 6f 6e | 04 54 72 75 65 0b 42 61 |ZoomIcon|.True.Ba|
|00004de0| 6c 6c 6f 6f 6e 48 65 6c | 70 00 09 50 6c 61 63 65 |lloonHel|p..Place|
|00004df0| 6d 65 6e 74 01 30 05 57 | 69 64 74 68 03 33 30 30 |ment.0.W|idth.300|
|00004e00| 06 48 65 69 67 68 74 03 | 31 36 32 08 4d 69 6e 57 |.Height.|162.MinW|
|00004e10| 69 64 74 68 02 36 34 09 | 4d 69 6e 48 65 69 67 68 |idth.64.|MinHeigh|
|00004e20| 74 02 36 34 08 4d 61 78 | 57 69 64 74 68 05 33 32 |t.64.Max|Width.32|
|00004e30| 30 30 30 09 4d 61 78 48 | 65 69 67 68 74 05 33 32 |000.MaxH|eight.32|
|00004e40| 30 30 30 07 00 0f 50 72 | 6f 67 72 61 6d 6d 65 72 |000...Pr|ogrammer|
|00004e50| 73 57 69 6e 64 ac 01 06 | 44 69 61 6c 6f 67 00 00 |sWind...|Dialog..|
|00004e60| 01 0e 49 6e 69 74 44 61 | 74 61 46 69 65 6c 64 73 |..InitDa|taFields|
|00004e70| 00 00 00 0b 15 0b 20 0d | 14 53 75 62 20 49 6e 69 |...... .|.Sub Ini|
|00004e80| 74 44 61 74 61 46 69 65 | 6c 64 73 28 29 1e 2f 2f |tDataFie|lds().//|
|00004e90| 20 43 75 72 72 65 6e 74 | 20 74 65 78 74 20 6c 69 | Current| text li|
|00004ea0| 6e 65 20 69 6e 64 69 63 | 61 74 6f 72 23 43 75 72 |ne indic|ator#Cur|
|00004eb0| 72 54 78 74 46 6c 64 2e | 54 65 78 74 20 3d 20 41 |rTxtFld.|Text = A|
|00004ec0| 70 70 2e 66 43 75 72 72 | 50 72 65 66 4c 69 6e 65 |pp.fCurr|PrefLine|
|00004ed0| 00 20 2f 2f 20 43 75 72 | 72 65 6e 74 20 71 75 6f |. // Cur|rent quo|
|00004ee0| 74 65 20 64 69 73 70 6c | 61 79 20 6d 65 74 68 6f |te displ|ay metho|
|00004ef0| 64 73 26 43 75 72 72 44 | 69 73 70 46 6c 64 2e 54 |ds&CurrD|ispFld.T|
|00004f00| 65 78 74 20 3d 20 41 70 | 70 2e 66 44 69 73 70 6c |ext = Ap|p.fDispl|
|00004f10| 61 79 50 61 74 74 65 72 | 6e 00 24 2f 2f 20 54 68 |ayPatter|n.$// Th|
|00004f20| 65 20 6e 61 6d 65 20 6f | 66 20 74 68 65 20 63 75 |e name o|f the cu|
|00004f30| 72 72 65 6e 74 20 70 72 | 65 66 20 66 69 6c 65 20 |rrent pr|ef file |
|00004f40| 43 75 72 72 50 72 65 66 | 46 6c 64 2e 54 65 78 74 |CurrPref|Fld.Text|
|00004f50| 20 3d 20 41 70 70 2e 66 | 50 72 65 66 4e 61 6d 65 | = App.f|PrefName|
|00004f60| 00 1f 2f 2f 20 54 68 65 | 20 63 75 72 72 65 6e 74 |..// The| current|
|00004f70| 20 74 65 78 74 20 73 6f | 75 72 63 65 20 66 69 6c | text so|urce fil|
|00004f80| 65 20 54 78 74 53 72 63 | 46 6c 64 2e 54 65 78 74 |e TxtSrc|Fld.Text|
|00004f90| 20 3d 20 41 70 70 2e 66 | 54 78 74 53 72 63 46 69 | = App.f|TxtSrcFi|
|00004fa0| 6c 65 07 45 6e 64 20 53 | 75 62 00 01 04 4f 70 65 |le.End S|ub...Ope|
|00004fb0| 6e 01 0e 01 0e 03 0a 53 | 75 62 20 4f 70 65 6e 28 |n......S|ub Open(|
|00004fc0| 29 0e 49 6e 69 74 44 61 | 74 61 46 69 65 6c 64 73 |).InitDa|taFields|
|00004fd0| 07 45 6e 64 20 53 75 62 | 00 00 09 07 00 00 b4 01 |.End Sub|........|
|00004fe0| 0a 50 75 73 68 42 75 74 | 74 6f 6e 00 00 00 00 01 |.PushBut|ton.....|
|00004ff0| 06 41 63 74 69 6f 6e 01 | 15 01 15 03 0c 53 75 62 |.Action.|.....Sub|
|00005000| 20 41 63 74 69 6f 6e 28 | 29 15 50 72 6f 67 72 61 | Action(|).Progra|
|00005010| 6d 6d 65 72 73 57 69 6e | 64 2e 43 6c 6f 73 65 07 |mmersWin|d.Close.|
|00005020| 45 6e 64 20 53 75 62 00 | 00 07 00 00 b4 01 0a 53 |End Sub.|.......S|
|00005030| 74 61 74 69 63 54 65 78 | 74 00 00 00 00 00 00 00 |taticTex|t.......|
|00005040| 07 00 00 88 02 09 45 64 | 69 74 46 69 65 6c 64 00 |......Ed|itField.|
|00005050| 00 00 00 00 00 00 07 00 | 00 b4 01 0a 53 74 61 74 |........|....Stat|
|00005060| 69 63 54 65 78 74 00 00 | 00 00 00 00 00 07 00 00 |icText..|........|
|00005070| 88 02 09 45 64 69 74 46 | 69 65 6c 64 00 00 00 00 |...EditF|ield....|
|00005080| 00 00 00 07 00 00 b4 01 | 0a 53 74 61 74 69 63 54 |........|.StaticT|
|00005090| 65 78 74 00 00 00 00 00 | 00 00 07 00 00 88 02 09 |ext.....|........|
|000050a0| 45 64 69 74 46 69 65 6c | 64 00 00 00 00 00 00 00 |EditFiel|d.......|
|000050b0| 07 00 00 b4 01 0a 53 74 | 61 74 69 63 54 65 78 74 |......St|aticText|
|000050c0| 00 00 00 00 00 00 00 07 | 00 00 88 02 09 45 64 69 |........|.....Edi|
|000050d0| 74 46 69 65 6c 64 00 00 | 00 00 00 00 00 09 0a 50 |tField..|.......P|
|000050e0| 75 73 68 42 75 74 74 6f | 6e 17 04 4e 61 6d 65 0b |ushButto|n..Name.|
|000050f0| 50 75 73 68 42 75 74 74 | 6f 6e 31 05 49 6e 64 65 |PushButt|on1.Inde|
|00005100| 78 0b 2d 32 31 34 37 34 | 38 33 36 34 38 0d 54 61 |x.-21474|83648.Ta|
|00005110| 62 50 61 6e 65 6c 49 6e | 64 65 78 01 30 07 56 69 |bPanelIn|dex.0.Vi|
|00005120| 73 69 62 6c 65 04 54 72 | 75 65 04 4c 65 66 74 03 |sible.Tr|ue.Left.|
|00005130| 32 32 36 03 54 6f 70 03 | 31 32 39 05 57 69 64 74 |226.Top.|129.Widt|
|00005140| 68 02 36 30 06 48 65 69 | 67 68 74 02 32 30 0b 42 |h.60.Hei|ght.20.B|
|00005150| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 13 44 69 73 61 |alloonHe|lp..Disa|
|00005160| 62 6c 65 64 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 00 |bledBall|oonHelp.|
|00005170| 08 4c 6f 63 6b 4c 65 66 | 74 05 46 61 6c 73 65 07 |.LockLef|t.False.|
|00005180| 4c 6f 63 6b 54 6f 70 05 | 46 61 6c 73 65 09 4c 6f |LockTop.|False.Lo|
|00005190| 63 6b 52 69 67 68 74 05 | 46 61 6c 73 65 0a 4c 6f |ckRight.|False.Lo|
|000051a0| 63 6b 42 6f 74 74 6f 6d | 05 46 61 6c 73 65 08 54 |ckBottom|.False.T|
|000051b0| 65 78 74 46 6f 6e 74 06 | 53 79 73 74 65 6d 08 54 |extFont.|System.T|
|000051c0| 65 78 74 53 69 7a 65 02 | 31 32 04 42 6f 6c 64 05 |extSize.|12.Bold.|
|000051d0| 46 61 6c 73 65 06 49 74 | 61 6c 69 63 05 46 61 6c |False.It|alic.Fal|
|000051e0| 73 65 09 55 6e 64 65 72 | 6c 69 6e 65 05 46 61 6c |se.Under|line.Fal|
|000051f0| 73 65 07 43 61 70 74 69 | 6f 6e 05 43 6c 6f 73 65 |se.Capti|on.Close|
|00005200| 07 44 65 66 61 75 6c 74 | 04 54 72 75 65 06 43 61 |.Default|.True.Ca|
|00005210| 6e 63 65 6c 05 46 61 6c | 73 65 07 45 6e 61 62 6c |ncel.Fal|se.Enabl|
|00005220| 65 64 04 54 72 75 65 00 | 0a 53 74 61 74 69 63 54 |ed.True.|.StaticT|
|00005230| 65 78 74 17 04 4e 61 6d | 65 0b 53 74 61 74 69 63 |ext..Nam|e.Static|
|00005240| 54 65 78 74 31 05 49 6e | 64 65 78 0b 2d 32 31 34 |Text1.In|dex.-214|
|00005250| 37 34 38 33 36 34 38 0d | 54 61 62 50 61 6e 65 6c |7483648.|TabPanel|
|00005260| 49 6e 64 65 78 01 30 07 | 56 69 73 69 62 6c 65 04 |Index.0.|Visible.|
|00005270| 54 72 75 65 04 4c 65 66 | 74 02 31 33 03 54 6f 70 |True.Lef|t.13.Top|
|00005280| 02 31 38 05 57 69 64 74 | 68 03 31 31 32 06 48 65 |.18.Widt|h.112.He|
|00005290| 69 67 68 74 02 31 36 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.16.|BalloonH|
|000052a0| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|000052b0| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|000052c0| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|000052d0| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|000052e0| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|000052f0| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|00005300| 06 53 79 73 74 65 6d 08 | 54 65 78 74 53 69 7a 65 |.System.|TextSize|
|00005310| 02 31 32 04 42 6f 6c 64 | 05 46 61 6c 73 65 06 49 |.12.Bold|.False.I|
|00005320| 74 61 6c 69 63 05 46 61 | 6c 73 65 09 55 6e 64 65 |talic.Fa|lse.Unde|
|00005330| 72 6c 69 6e 65 05 46 61 | 6c 73 65 04 54 65 78 74 |rline.Fa|lse.Text|
|00005340| 12 43 75 72 72 65 6e 74 | 20 74 65 78 74 20 6c 69 |.Current| text li|
|00005350| 6e 65 3a 09 54 65 78 74 | 41 6c 69 67 6e 01 30 09 |ne:.Text|Align.0.|
|00005360| 54 65 78 74 43 6f 6c 6f | 72 01 30 09 4d 75 6c 74 |TextColo|r.0.Mult|
|00005370| 69 4c 69 6e 65 05 46 61 | 6c 73 65 01 09 45 64 69 |iLine.Fa|lse..Edi|
|00005380| 74 46 69 65 6c 64 20 04 | 4e 61 6d 65 0a 43 75 72 |tField .|Name.Cur|
|00005390| 72 54 78 74 46 6c 64 05 | 49 6e 64 65 78 0b 2d 32 |rTxtFld.|Index.-2|
|000053a0| 31 34 37 34 38 33 36 34 | 38 0d 54 61 62 50 61 6e |14748364|8.TabPan|
|000053b0| 65 6c 49 6e 64 65 78 01 | 30 07 56 69 73 69 62 6c |elIndex.|0.Visibl|
|000053c0| 65 04 54 72 75 65 04 4c | 65 66 74 03 31 32 36 03 |e.True.L|eft.126.|
|000053d0| 54 6f 70 02 31 35 05 57 | 69 64 74 68 03 31 36 30 |Top.15.W|idth.160|
|000053e0| 06 48 65 69 67 68 74 02 | 32 32 0b 42 61 6c 6c 6f |.Height.|22.Ballo|
|000053f0| 6f 6e 48 65 6c 70 00 13 | 44 69 73 61 62 6c 65 64 |onHelp..|Disabled|
|00005400| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 08 4c 6f 63 |BalloonH|elp..Loc|
|00005410| 6b 4c 65 66 74 05 46 61 | 6c 73 65 07 4c 6f 63 6b |kLeft.Fa|lse.Lock|
|00005420| 54 6f 70 05 46 61 6c 73 | 65 09 4c 6f 63 6b 52 69 |Top.Fals|e.LockRi|
|00005430| 67 68 74 05 46 61 6c 73 | 65 0a 4c 6f 63 6b 42 6f |ght.Fals|e.LockBo|
|00005440| 74 74 6f 6d 05 46 61 6c | 73 65 08 54 65 78 74 46 |ttom.Fal|se.TextF|
|00005450| 6f 6e 74 06 53 79 73 74 | 65 6d 08 54 65 78 74 53 |ont.Syst|em.TextS|
|00005460| 69 7a 65 02 31 32 04 42 | 6f 6c 64 05 46 61 6c 73 |ize.12.B|old.Fals|
|00005470| 65 06 49 74 61 6c 69 63 | 05 46 61 6c 73 65 09 55 |e.Italic|.False.U|
|00005480| 6e 64 65 72 6c 69 6e 65 | 05 46 61 6c 73 65 06 42 |nderline|.False.B|
|00005490| 6f 72 64 65 72 04 54 72 | 75 65 09 4d 75 6c 74 69 |order.Tr|ue.Multi|
|000054a0| 4c 69 6e 65 05 46 61 6c | 73 65 09 53 63 72 6f 6c |Line.Fal|se.Scrol|
|000054b0| 6c 42 61 72 04 54 72 75 | 65 06 53 74 79 6c 65 64 |lBar.Tru|e.Styled|
|000054c0| 05 46 61 6c 73 65 08 50 | 61 73 73 77 6f 72 64 05 |.False.P|assword.|
|000054d0| 46 61 6c 73 65 0c 55 73 | 65 46 6f 63 75 73 52 69 |False.Us|eFocusRi|
|000054e0| 6e 67 04 54 72 75 65 08 | 52 65 61 64 4f 6e 6c 79 |ng.True.|ReadOnly|
|000054f0| 05 46 61 6c 73 65 09 4c | 69 6d 69 74 54 65 78 74 |.False.L|imitText|
|00005500| 01 30 0a 41 63 63 65 70 | 74 54 61 62 73 05 46 61 |.0.Accep|tTabs.Fa|
|00005510| 6c 73 65 09 54 65 78 74 | 43 6f 6c 6f 72 01 30 09 |lse.Text|Color.0.|
|00005520| 42 61 63 6b 43 6f 6c 6f | 72 08 31 36 37 37 37 32 |BackColo|r.167772|
|00005530| 31 35 07 45 6e 61 62 6c | 65 64 04 54 72 75 65 04 |15.Enabl|ed.True.|
|00005540| 54 65 78 74 00 02 0a 53 | 74 61 74 69 63 54 65 78 |Text...S|taticTex|
|00005550| 74 17 04 4e 61 6d 65 0b | 53 74 61 74 69 63 54 65 |t..Name.|StaticTe|
|00005560| 78 74 32 05 49 6e 64 65 | 78 0b 2d 32 31 34 37 34 |xt2.Inde|x.-21474|
|00005570| 38 33 36 34 38 0d 54 61 | 62 50 61 6e 65 6c 49 6e |83648.Ta|bPanelIn|
|00005580| 64 65 78 01 30 07 56 69 | 73 69 62 6c 65 04 54 72 |dex.0.Vi|sible.Tr|
|00005590| 75 65 04 4c 65 66 74 02 | 31 39 03 54 6f 70 02 34 |ue.Left.|19.Top.4|
|000055a0| 36 05 57 69 64 74 68 03 | 31 30 35 06 48 65 69 67 |6.Width.|105.Heig|
|000055b0| 68 74 02 31 36 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |ht.16.Ba|lloonHel|
|000055c0| 70 00 13 44 69 73 61 62 | 6c 65 64 42 61 6c 6c 6f |p..Disab|ledBallo|
|000055d0| 6f 6e 48 65 6c 70 00 08 | 4c 6f 63 6b 4c 65 66 74 |onHelp..|LockLeft|
|000055e0| 05 46 61 6c 73 65 07 4c | 6f 63 6b 54 6f 70 05 46 |.False.L|ockTop.F|
|000055f0| 61 6c 73 65 09 4c 6f 63 | 6b 52 69 67 68 74 05 46 |alse.Loc|kRight.F|
|00005600| 61 6c 73 65 0a 4c 6f 63 | 6b 42 6f 74 74 6f 6d 05 |alse.Loc|kBottom.|
|00005610| 46 61 6c 73 65 08 54 65 | 78 74 46 6f 6e 74 06 53 |False.Te|xtFont.S|
|00005620| 79 73 74 65 6d 08 54 65 | 78 74 53 69 7a 65 02 31 |ystem.Te|xtSize.1|
|00005630| 32 04 42 6f 6c 64 05 46 | 61 6c 73 65 06 49 74 61 |2.Bold.F|alse.Ita|
|00005640| 6c 69 63 05 46 61 6c 73 | 65 09 55 6e 64 65 72 6c |lic.Fals|e.Underl|
|00005650| 69 6e 65 05 46 61 6c 73 | 65 04 54 65 78 74 10 43 |ine.Fals|e.Text.C|
|00005660| 75 72 72 65 6e 74 20 64 | 69 73 70 6c 61 79 3a 09 |urrent d|isplay:.|
|00005670| 54 65 78 74 41 6c 69 67 | 6e 01 30 09 54 65 78 74 |TextAlig|n.0.Text|
|00005680| 43 6f 6c 6f 72 01 30 09 | 4d 75 6c 74 69 4c 69 6e |Color.0.|MultiLin|
|00005690| 65 05 46 61 6c 73 65 03 | 09 45 64 69 74 46 69 65 |e.False.|.EditFie|
|000056a0| 6c 64 20 04 4e 61 6d 65 | 0b 43 75 72 72 44 69 73 |ld .Name|.CurrDis|
|000056b0| 70 46 6c 64 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |pFld.Ind|ex.-2147|
|000056c0| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|000056d0| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|000056e0| 72 75 65 04 4c 65 66 74 | 03 31 32 36 03 54 6f 70 |rue.Left|.126.Top|
|000056f0| 02 34 33 05 57 69 64 74 | 68 03 31 36 30 06 48 65 |.43.Widt|h.160.He|
|00005700| 69 67 68 74 02 32 32 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.22.|BalloonH|
|00005710| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|00005720| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|00005730| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|00005740| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|00005750| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|00005760| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|00005770| 06 53 79 73 74 65 6d 08 | 54 65 78 74 53 69 7a 65 |.System.|TextSize|
|00005780| 02 31 32 04 42 6f 6c 64 | 05 46 61 6c 73 65 06 49 |.12.Bold|.False.I|
|00005790| 74 61 6c 69 63 05 46 61 | 6c 73 65 09 55 6e 64 65 |talic.Fa|lse.Unde|
|000057a0| 72 6c 69 6e 65 05 46 61 | 6c 73 65 06 42 6f 72 64 |rline.Fa|lse.Bord|
|000057b0| 65 72 04 54 72 75 65 09 | 4d 75 6c 74 69 4c 69 6e |er.True.|MultiLin|
|000057c0| 65 05 46 61 6c 73 65 09 | 53 63 72 6f 6c 6c 42 61 |e.False.|ScrollBa|
|000057d0| 72 04 54 72 75 65 06 53 | 74 79 6c 65 64 05 46 61 |r.True.S|tyled.Fa|
|000057e0| 6c 73 65 08 50 61 73 73 | 77 6f 72 64 05 46 61 6c |lse.Pass|word.Fal|
|000057f0| 73 65 0c 55 73 65 46 6f | 63 75 73 52 69 6e 67 04 |se.UseFo|cusRing.|
|00005800| 54 72 75 65 08 52 65 61 | 64 4f 6e 6c 79 05 46 61 |True.Rea|dOnly.Fa|
|00005810| 6c 73 65 09 4c 69 6d 69 | 74 54 65 78 74 01 30 0a |lse.Limi|tText.0.|
|00005820| 41 63 63 65 70 74 54 61 | 62 73 05 46 61 6c 73 65 |AcceptTa|bs.False|
|00005830| 09 54 65 78 74 43 6f 6c | 6f 72 01 30 09 42 61 63 |.TextCol|or.0.Bac|
|00005840| 6b 43 6f 6c 6f 72 08 31 | 36 37 37 37 32 31 35 07 |kColor.1|6777215.|
|00005850| 45 6e 61 62 6c 65 64 04 | 54 72 75 65 04 54 65 78 |Enabled.|True.Tex|
|00005860| 74 00 04 0a 53 74 61 74 | 69 63 54 65 78 74 17 04 |t...Stat|icText..|
|00005870| 4e 61 6d 65 0b 53 74 61 | 74 69 63 54 65 78 74 33 |Name.Sta|ticText3|
|00005880| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|00005890| 34 38 0d 54 61 62 50 61 | 6e 65 6c 49 6e 64 65 78 |48.TabPa|nelIndex|
|000058a0| 01 30 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 04 |.0.Visib|le.True.|
|000058b0| 4c 65 66 74 02 34 32 03 | 54 6f 70 02 37 35 05 57 |Left.42.|Top.75.W|
|000058c0| 69 64 74 68 02 38 33 06 | 48 65 69 67 68 74 02 31 |idth.83.|Height.1|
|000058d0| 36 0b 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 13 44 |6.Balloo|nHelp..D|
|000058e0| 69 73 61 62 6c 65 64 42 | 61 6c 6c 6f 6f 6e 48 65 |isabledB|alloonHe|
|000058f0| 6c 70 00 08 4c 6f 63 6b | 4c 65 66 74 05 46 61 6c |lp..Lock|Left.Fal|
|00005900| 73 65 07 4c 6f 63 6b 54 | 6f 70 05 46 61 6c 73 65 |se.LockT|op.False|
|00005910| 09 4c 6f 63 6b 52 69 67 | 68 74 05 46 61 6c 73 65 |.LockRig|ht.False|
|00005920| 0a 4c 6f 63 6b 42 6f 74 | 74 6f 6d 05 46 61 6c 73 |.LockBot|tom.Fals|
|00005930| 65 08 54 65 78 74 46 6f | 6e 74 06 53 79 73 74 65 |e.TextFo|nt.Syste|
|00005940| 6d 08 54 65 78 74 53 69 | 7a 65 02 31 32 04 42 6f |m.TextSi|ze.12.Bo|
|00005950| 6c 64 05 46 61 6c 73 65 | 06 49 74 61 6c 69 63 05 |ld.False|.Italic.|
|00005960| 46 61 6c 73 65 09 55 6e | 64 65 72 6c 69 6e 65 05 |False.Un|derline.|
|00005970| 46 61 6c 73 65 04 54 65 | 78 74 0c 50 72 65 66 27 |False.Te|xt.Pref'|
|00005980| 73 20 6e 61 6d 65 3a 09 | 54 65 78 74 41 6c 69 67 |s name:.|TextAlig|
|00005990| 6e 01 30 09 54 65 78 74 | 43 6f 6c 6f 72 01 30 09 |n.0.Text|Color.0.|
|000059a0| 4d 75 6c 74 69 4c 69 6e | 65 05 46 61 6c 73 65 05 |MultiLin|e.False.|
|000059b0| 09 45 64 69 74 46 69 65 | 6c 64 20 04 4e 61 6d 65 |.EditFie|ld .Name|
|000059c0| 0b 43 75 72 72 50 72 65 | 66 46 6c 64 05 49 6e 64 |.CurrPre|fFld.Ind|
|000059d0| 65 78 0b 2d 32 31 34 37 | 34 38 33 36 34 38 0d 54 |ex.-2147|483648.T|
|000059e0| 61 62 50 61 6e 65 6c 49 | 6e 64 65 78 01 30 07 56 |abPanelI|ndex.0.V|
|000059f0| 69 73 69 62 6c 65 04 54 | 72 75 65 04 4c 65 66 74 |isible.T|rue.Left|
|00005a00| 03 31 32 36 03 54 6f 70 | 02 37 31 05 57 69 64 74 |.126.Top|.71.Widt|
|00005a10| 68 03 31 36 30 06 48 65 | 69 67 68 74 02 32 32 0b |h.160.He|ight.22.|
|00005a20| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 13 44 69 73 |BalloonH|elp..Dis|
|00005a30| 61 62 6c 65 64 42 61 6c | 6c 6f 6f 6e 48 65 6c 70 |abledBal|loonHelp|
|00005a40| 00 08 4c 6f 63 6b 4c 65 | 66 74 05 46 61 6c 73 65 |..LockLe|ft.False|
|00005a50| 07 4c 6f 63 6b 54 6f 70 | 05 46 61 6c 73 65 09 4c |.LockTop|.False.L|
|00005a60| 6f 63 6b 52 69 67 68 74 | 05 46 61 6c 73 65 0a 4c |ockRight|.False.L|
|00005a70| 6f 63 6b 42 6f 74 74 6f | 6d 05 46 61 6c 73 65 08 |ockBotto|m.False.|
|00005a80| 54 65 78 74 46 6f 6e 74 | 06 53 79 73 74 65 6d 08 |TextFont|.System.|
|00005a90| 54 65 78 74 53 69 7a 65 | 02 31 32 04 42 6f 6c 64 |TextSize|.12.Bold|
|00005aa0| 05 46 61 6c 73 65 06 49 | 74 61 6c 69 63 05 46 61 |.False.I|talic.Fa|
|00005ab0| 6c 73 65 09 55 6e 64 65 | 72 6c 69 6e 65 05 46 61 |lse.Unde|rline.Fa|
|00005ac0| 6c 73 65 06 42 6f 72 64 | 65 72 04 54 72 75 65 09 |lse.Bord|er.True.|
|00005ad0| 4d 75 6c 74 69 4c 69 6e | 65 05 46 61 6c 73 65 09 |MultiLin|e.False.|
|00005ae0| 53 63 72 6f 6c 6c 42 61 | 72 04 54 72 75 65 06 53 |ScrollBa|r.True.S|
|00005af0| 74 79 6c 65 64 05 46 61 | 6c 73 65 08 50 61 73 73 |tyled.Fa|lse.Pass|
|00005b00| 77 6f 72 64 05 46 61 6c | 73 65 0c 55 73 65 46 6f |word.Fal|se.UseFo|
|00005b10| 63 75 73 52 69 6e 67 04 | 54 72 75 65 08 52 65 61 |cusRing.|True.Rea|
|00005b20| 64 4f 6e 6c 79 05 46 61 | 6c 73 65 09 4c 69 6d 69 |dOnly.Fa|lse.Limi|
|00005b30| 74 54 65 78 74 01 30 0a | 41 63 63 65 70 74 54 61 |tText.0.|AcceptTa|
|00005b40| 62 73 05 46 61 6c 73 65 | 09 54 65 78 74 43 6f 6c |bs.False|.TextCol|
|00005b50| 6f 72 01 30 09 42 61 63 | 6b 43 6f 6c 6f 72 08 31 |or.0.Bac|kColor.1|
|00005b60| 36 37 37 37 32 31 35 07 | 45 6e 61 62 6c 65 64 04 |6777215.|Enabled.|
|00005b70| 54 72 75 65 04 54 65 78 | 74 00 06 0a 53 74 61 74 |True.Tex|t...Stat|
|00005b80| 69 63 54 65 78 74 17 04 | 4e 61 6d 65 0b 53 74 61 |icText..|Name.Sta|
|00005b90| 74 69 63 54 65 78 74 34 | 05 49 6e 64 65 78 0b 2d |ticText4|.Index.-|
|00005ba0| 32 31 34 37 34 38 33 36 | 34 38 0d 54 61 62 50 61 |21474836|48.TabPa|
|00005bb0| 6e 65 6c 49 6e 64 65 78 | 01 30 07 56 69 73 69 62 |nelIndex|.0.Visib|
|00005bc0| 6c 65 04 54 72 75 65 04 | 4c 65 66 74 02 31 39 03 |le.True.|Left.19.|
|00005bd0| 54 6f 70 03 31 30 32 05 | 57 69 64 74 68 03 31 30 |Top.102.|Width.10|
|00005be0| 36 06 48 65 69 67 68 74 | 02 31 36 0b 42 61 6c 6c |6.Height|.16.Ball|
|00005bf0| 6f 6f 6e 48 65 6c 70 00 | 13 44 69 73 61 62 6c 65 |oonHelp.|.Disable|
|00005c00| 64 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 08 4c 6f |dBalloon|Help..Lo|
|00005c10| 63 6b 4c 65 66 74 05 46 | 61 6c 73 65 07 4c 6f 63 |ckLeft.F|alse.Loc|
|00005c20| 6b 54 6f 70 05 46 61 6c | 73 65 09 4c 6f 63 6b 52 |kTop.Fal|se.LockR|
|00005c30| 69 67 68 74 05 46 61 6c | 73 65 0a 4c 6f 63 6b 42 |ight.Fal|se.LockB|
|00005c40| 6f 74 74 6f 6d 05 46 61 | 6c 73 65 08 54 65 78 74 |ottom.Fa|lse.Text|
|00005c50| 46 6f 6e 74 06 53 79 73 | 74 65 6d 08 54 65 78 74 |Font.Sys|tem.Text|
|00005c60| 53 69 7a 65 02 31 32 04 | 42 6f 6c 64 05 46 61 6c |Size.12.|Bold.Fal|
|00005c70| 73 65 06 49 74 61 6c 69 | 63 05 46 61 6c 73 65 09 |se.Itali|c.False.|
|00005c80| 55 6e 64 65 72 6c 69 6e | 65 05 46 61 6c 73 65 04 |Underlin|e.False.|
|00005c90| 54 65 78 74 11 54 65 78 | 74 20 73 6f 75 72 63 65 |Text.Tex|t source|
|00005ca0| 20 66 69 6c 65 3a 09 54 | 65 78 74 41 6c 69 67 6e | file:.T|extAlign|
|00005cb0| 01 30 09 54 65 78 74 43 | 6f 6c 6f 72 01 30 09 4d |.0.TextC|olor.0.M|
|00005cc0| 75 6c 74 69 4c 69 6e 65 | 05 46 61 6c 73 65 07 09 |ultiLine|.False..|
|00005cd0| 45 64 69 74 46 69 65 6c | 64 20 04 4e 61 6d 65 09 |EditFiel|d .Name.|
|00005ce0| 54 78 74 53 72 63 46 6c | 64 05 49 6e 64 65 78 0b |TxtSrcFl|d.Index.|
|00005cf0| 2d 32 31 34 37 34 38 33 | 36 34 38 0d 54 61 62 50 |-2147483|648.TabP|
|00005d00| 61 6e 65 6c 49 6e 64 65 | 78 01 30 07 56 69 73 69 |anelInde|x.0.Visi|
|00005d10| 62 6c 65 04 54 72 75 65 | 04 4c 65 66 74 03 31 32 |ble.True|.Left.12|
|00005d20| 36 03 54 6f 70 02 39 38 | 05 57 69 64 74 68 03 31 |6.Top.98|.Width.1|
|00005d30| 36 30 06 48 65 69 67 68 | 74 02 32 32 0b 42 61 6c |60.Heigh|t.22.Bal|
|00005d40| 6c 6f 6f 6e 48 65 6c 70 | 00 13 44 69 73 61 62 6c |loonHelp|..Disabl|
|00005d50| 65 64 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 08 4c |edBalloo|nHelp..L|
|00005d60| 6f 63 6b 4c 65 66 74 05 | 46 61 6c 73 65 07 4c 6f |ockLeft.|False.Lo|
|00005d70| 63 6b 54 6f 70 05 46 61 | 6c 73 65 09 4c 6f 63 6b |ckTop.Fa|lse.Lock|
|00005d80| 52 69 67 68 74 05 46 61 | 6c 73 65 0a 4c 6f 63 6b |Right.Fa|lse.Lock|
|00005d90| 42 6f 74 74 6f 6d 05 46 | 61 6c 73 65 08 54 65 78 |Bottom.F|alse.Tex|
|00005da0| 74 46 6f 6e 74 06 53 79 | 73 74 65 6d 08 54 65 78 |tFont.Sy|stem.Tex|
|00005db0| 74 53 69 7a 65 02 31 32 | 04 42 6f 6c 64 05 46 61 |tSize.12|.Bold.Fa|
|00005dc0| 6c 73 65 06 49 74 61 6c | 69 63 05 46 61 6c 73 65 |lse.Ital|ic.False|
|00005dd0| 09 55 6e 64 65 72 6c 69 | 6e 65 05 46 61 6c 73 65 |.Underli|ne.False|
|00005de0| 06 42 6f 72 64 65 72 04 | 54 72 75 65 09 4d 75 6c |.Border.|True.Mul|
|00005df0| 74 69 4c 69 6e 65 05 46 | 61 6c 73 65 09 53 63 72 |tiLine.F|alse.Scr|
|00005e00| 6f 6c 6c 42 61 72 04 54 | 72 75 65 06 53 74 79 6c |ollBar.T|rue.Styl|
|00005e10| 65 64 05 46 61 6c 73 65 | 08 50 61 73 73 77 6f 72 |ed.False|.Passwor|
|00005e20| 64 05 46 61 6c 73 65 0c | 55 73 65 46 6f 63 75 73 |d.False.|UseFocus|
|00005e30| 52 69 6e 67 04 54 72 75 | 65 08 52 65 61 64 4f 6e |Ring.Tru|e.ReadOn|
|00005e40| 6c 79 05 46 61 6c 73 65 | 09 4c 69 6d 69 74 54 65 |ly.False|.LimitTe|
|00005e50| 78 74 01 30 0a 41 63 63 | 65 70 74 54 61 62 73 05 |xt.0.Acc|eptTabs.|
|00005e60| 46 61 6c 73 65 09 54 65 | 78 74 43 6f 6c 6f 72 01 |False.Te|xtColor.|
|00005e70| 30 09 42 61 63 6b 43 6f | 6c 6f 72 08 31 36 37 37 |0.BackCo|lor.1677|
|00005e80| 37 32 31 35 07 45 6e 61 | 62 6c 65 64 04 54 72 75 |7215.Ena|bled.Tru|
|00005e90| 65 04 54 65 78 74 00 08 | 00 0c 41 07 50 69 63 74 |e.Text..|..A.Pict|
|00005ea0| 75 72 65 09 41 62 6f 75 | 74 42 6f 78 32 03 84 04 |ure.Abou|tBox2...|
|00005eb0| 88 03 00 07 55 6e 6b 6e | 6f 77 6e 80 01 52 45 41 |....Unkn|own..REA|
|00005ec0| 4c 62 61 73 69 63 20 43 | 44 3a 45 78 61 6d 70 6c |Lbasic C|D:Exampl|
|00005ed0| 65 73 3a 41 70 70 6c 69 | 63 61 74 69 6f 6e 73 3a |es:Appli|cations:|
|00005ee0| 51 75 6f 74 65 54 68 69 | 6e 67 30 2e 36 3a 41 62 |QuoteThi|ng0.6:Ab|
|00005ef0| 6f 75 74 42 6f 78 32 2e | 31 2e 50 43 54 0f 41 62 |outBox2.|1.PCT.Ab|
|00005f00| 6f 75 74 42 6f 78 32 2e | 31 2e 50 43 54 0d 41 07 |outBox2.|1.PCT.A.|
|00005f10| 50 69 63 74 75 72 65 07 | 42 6c 75 65 55 52 4c 03 |Picture.|BlueURL.|
|00005f20| 81 03 0a 00 07 55 6e 6b | 6e 6f 77 6e 38 52 45 41 |.....Unk|nown8REA|
|00005f30| 4c 62 61 73 69 63 20 43 | 44 3a 45 78 61 6d 70 6c |Lbasic C|D:Exampl|
|00005f40| 65 73 3a 41 70 70 6c 69 | 63 61 74 69 6f 6e 73 3a |es:Appli|cations:|
|00005f50| 51 75 6f 74 65 54 68 69 | 6e 67 30 2e 36 3a 42 6c |QuoteThi|ng0.6:Bl|
|00005f60| 75 65 55 52 4c 07 42 6c | 75 65 55 52 4c 0e 41 07 |ueURL.Bl|ueURL.A.|
|00005f70| 50 69 63 74 75 72 65 06 | 52 65 64 55 52 4c 03 81 |Picture.|RedURL..|
|00005f80| 03 0a 00 07 55 6e 6b 6e | 6f 77 6e 37 52 45 41 4c |....Unkn|own7REAL|
|00005f90| 62 61 73 69 63 20 43 44 | 3a 45 78 61 6d 70 6c 65 |basic CD|:Example|
|00005fa0| 73 3a 41 70 70 6c 69 63 | 61 74 69 6f 6e 73 3a 51 |s:Applic|ations:Q|
|00005fb0| 75 6f 74 65 54 68 69 6e | 67 30 2e 36 3a 52 65 64 |uoteThin|g0.6:Red|
|00005fc0| 55 52 4c 06 52 65 64 55 | 52 4c 11 41 09 52 65 73 |URL.RedU|RL.A.Res|
|00005fd0| 6f 75 72 63 65 73 09 52 | 65 73 6f 75 72 63 65 73 |ources.R|esources|
|00005fe0| 01 92 04 00 00 00 00 01 | 12 00 02 00 00 0c 52 45 |........|......RE|
|00005ff0| 41 4c 62 61 73 69 63 20 | 43 44 00 00 00 00 00 00 |ALbasic |CD......|
|00006000| 00 00 00 00 00 00 00 00 | 00 b1 b8 d1 13 42 44 00 |........|.....BD.|
|00006010| 05 00 00 01 62 11 50 72 | 6f 6a 65 63 74 20 49 6e |....b.Pr|oject In|
|00006020| 66 6f 20 52 73 72 63 00 | 00 00 00 00 00 00 00 00 |fo Rsrc.|........|
|00006030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006050| 00 00 00 00 00 00 00 01 | 66 b1 81 e2 78 72 73 72 |........|f...xrsr|
|00006060| 63 52 53 45 44 00 01 00 | 01 00 00 00 02 00 00 00 |cRSED...|........|
|00006070| 00 00 00 00 00 00 00 00 | 00 00 00 00 0d 51 75 6f |........|.....Quo|
|00006080| 74 65 54 68 69 6e 67 30 | 2e 36 00 00 01 00 0c 00 |teThing0|.6......|
|00006090| 00 01 62 00 00 00 15 00 | 00 00 14 00 02 00 42 52 |..b.....|......BR|
|000060a0| 45 41 4c 62 61 73 69 63 | 20 43 44 3a 45 78 61 6d |EALbasic| CD:Exam|
|000060b0| 70 6c 65 73 3a 41 70 70 | 6c 69 63 61 74 69 6f 6e |ples:App|lication|
|000060c0| 73 3a 51 75 6f 74 65 54 | 68 69 6e 67 30 2e 36 3a |s:QuoteT|hing0.6:|
|000060d0| 50 72 6f 6a 65 63 74 20 | 49 6e 66 6f 20 52 73 72 |Project |Info Rsr|
|000060e0| 63 00 06 00 0b 2e 44 69 | 76 61 49 6d 61 67 65 33 |c.....Di|vaImage3|
|000060f0| 00 ff ff 00 00 | |..... | |
+--------+-------------------------+-------------------------+--------+--------+
